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RXBC Dt'C/Xn SYSTFIM EXEPCISKP ^<OD^LR; 
XRXBCP.Pll 05-APR-79 lll52 



MACYU 30A(i052) 05-APR-79 lls54 PAGE 7 



SEQ 0006 



lOMnDX <RXRC >»177170, 

MODULE 150000, RXBC ,l^ 

.TITLE RXBC DEC/Xll SY 

DDXCOM VERSION 6 



264,5,0,2,2t^2»137,RHUF,fe4.,66, 
7n0,264,5,0,2,202,i37,BBUF,6 4,,feb, 
STEM EXFPCISER MODULE 

23-MAY-78 

.LIST PIN 



000000' 




PEGINi 




P00000' 


054122 041502 


040 MODNA»^l 


•ASCII /RXBC / JMODULE 


000005' 


000 


XFLAGi 


.BYTE OPEN 


000006* 


177170 


AODRI 


17717040 


000010' 


000264 


VECTORi 


264 + 


000012' 


240 


BB1 1 


.BYTE PPTY5+0 


000013* 


000 


BR2I 


.BYTE PRTY0+0 


000014' 


000003 


DVIDl J 


2 + 1 


01^0016' 


000000 


SPl! 


OPEN 


000020' 


000000 


SR2I 


OPEN 


000022' 


000000 


SP3: 


OPEN 


000024* 


000000 


SR4I 


OPEN 






;«»#»«»»#«»#»»»#»*<*»*«««»»»«»»». 


01^0026' 


150000 


STATi 


150000 


000030' 


000376' 


INITI 


STAPT 


000032' 


000252' 


SPOINTj 


MODSP 


000034' 


000000 


PASCNTI 





000036' 


000202 


ICONTI 


202 


000040' 


000000 


ICOUNT! 





000042* 


000000 


SOFCNTI 





000044' 


000000 


HRDCNTI 





000046' 


000000 


SOFPASI 





000050' 


00000P' 


HRDPAS! 





000052' 


000000 


SYSCUTJ 





£»00054' 


000000 


PANNUMI 





000056* 




CONFIGs 




000056' 


000000 


PESU 





000060' 


000000 


PES2» 





000062' 


000000 


5VP0! 


OPEN 


000064* 


000000 


SVPli 


OPEN 


000066* 


000000 


5VR2J 


OPEW 


000070' 


000000 


SVP3I 


OPEN 


000072' 


000000 


SVR4J 


OPEN 


000074* 


000000 


SVR55 


OPEN 


000076* 


000000 


SVR6! 


OPEN 


000100* 


000000 


CSRAi 


OPEN 


000102' 




SBADRI 




000102' 


000000 


ACSP! 


OPEN 


000104' 




WA5ADPI 




000104' 


000000 


ASTATJ 


OPEN 


000106' 




ERPTYPf 




000106' 


000000 


ASB! 


OPEN 


000110' 


00000!?! 


AWASI 


OPEN 


000112' 


000666' 


PSTRTs 


PESTRT 


000114' 


000000 


WDTOJ 


OPEN 


000 116' 


000000 


WDFRi 


OPEN 


000120' 


000000 


INTRI 


OPEN 


000122' 


000137 


IDNUH: 


137 


000124' 


005770' 


PPUFVAI 


PPUF 


000126* 


000000 


pf^UFpA! 


OPEN 



NAMF. 

jUSED TO KEEP TRACK OF WBUFF USAGE 

I 1ST DEVICE ADDR. 

llST DEVICE VECTOR. 

IIST PR LEVEL. 

j2ND PR LEVEL. 

IDEVICE INDICATOR 1, 

;SW1TCH REGISTER I 

ISWITCH REGISTER 2 

jSWITCH REGISTEP 3 

JSAlTCH REGISTER 4 

ISTAIUS WORD, 

JMODULE START ADDR. 

fMODULE STACK POINTER. 

JPASS COUNTER, 

M OF ITERATIONS PER PASSs202 

JLOC TO COUNT ITERATIONS 

JLOC TO SAVE TOTAL SOFT ERRORS 

JLOC TO SAVE TOTAL HARD ERRORS 

ILOC TO SAVE SOFT ERRORS PER PASS 

JLOC TO SAVE HAPD ERRORS PER PASS 

M OF SYS ERRORS ACCUMULATED 

IHOLDS RANDOM » WHEN PAND ^'ACPO IS CALL 

.•RESERVED FOR MONITOR USE 

.•RESERVED FOR MONITOR USE 

jPESERVED FOR MONITOR USE 

JLOC TO SAVE P0. 

iLOC TO SAVE Bl. 

JLOC TC SAVE R2. 

jLOC TO SAVE P3, 

JLOC TO SAVE R4, 

jLOC TO SAVE P5, 

JLOC TO SAVE Rfa. 

jADDR OF CURRENT CSP. 

JADDP OF GOOD DATA, OP 

jCONTENTS OF CSR, 

JADDR OF BAD DATA, OR 

jSTATUS REG CONTENTS. 

J TYPE OF ERROR 

jEXPECTED DATA. 

JACTUAL DATA. 

J RESTART ADDRESS AFTER Fi4D OF PASS 

JWORDS TO MEMORY PER ITERATION 

JWOPDS FROM MEMORY PER ITERATION 

J8 OF IMTERRUPTS PEP ITERATION 

jMODULE IDENTIFICATION NUMBFR=137 

JPEAD BUFFER VIRTUAL ADDRESS 

jPEAU BUFFER PHYSICAL ADDRESS 
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000130* 


000000 


000132* 


000100 


000134* 


000000 


000136* 


«0!«000 


000140' 


000102 


000142' 


000000 


000144' 


00000f. 


000146' 


0W000H 


000150* 


000000 




000040 



RBUFEAl OPEN 
PBUFSZl 64. 
WBUFPAl OPEN 
WBUFFA! OPEN 
WPUFRQJ 66. 
WBUFSZS OPEN 
CDEFCTj OPEN 
CD*^nCT» OPEN 
FREE! OPEN 
• PERT 
.f'LTST 
.V.OPD 
.LIST 
.ENDR 



jPEAD BUFFER EA bITS 
JSIZE OF THE READ BUFFER 
JWRITE BUFFER PHYSICAL ADDRESS 
JtvRITE BUFFER FA BITS 
jKRITF BUFFER SIZE REQUESTED 
JWRITE BUFFER SIZE AVAILABLE 
jCDATA/DATCK EPHOP COUNT 
JCOAXA/OATCK i^OPD COUNT 
J RESERVED FOR FUTURE USt 
Jf-'ODULE STACK STAPTS HEFE, 



«»««««#«#«««»««««««»««««#'» 



»»»«»»«##»»*»«»*»»«»«»4» 



•»■»»##»■»*•»«»»»*«#«« 
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322 






323 






324 


000252* 


000000 


325 


000554* 


000000 


326 


000256' 


000000 


327 


000260' 


000000 


328 


000262' 


0000^0 


329 


0<?0264' 


000000 


33S^ 


000266' 


000000 


331 


000270' 


000000 


332 


000272' 


000000 


333 


000274' 


000000 


334 


000276' 


000000 


335 


000300' 


000000 


336 


000302' 


000100 


337 


000304* 


0^10000 


338 


000306' 


000000 


339 


000310' 


000000 


340 


000312' 


000000 


341 


000314' 


000000 


342 


000316' 


000000 


343 


000320' 


000000 


344 


000322' 


000000 


345 


000324' 


000000 


346 


000326' 


000000 


347 


000330* 


000000 


346 


000332' 


000000 


349 


000334' 


000000 


350 


000336' 


000000 


351 






352 






353 






354 






355 






356 


000340' 


000000 


357 


000342' 


000000 


358 


000344' 


000000 


359 


i*00346' 


000000 


360 


00f350' 


000000 


361 


000352' 


000000 


362 


000354' 


000000 


363 


000356' 


000000 


364 


000360' 


000350 


365 


000362' 


000364 


366 


000364* 


000366 


367 






36q 






369 






370 


000366' 


177170 


371 


000370' 


177172 


372 


000372' 


000264 


373 


00037 4' 


000111 


374 







-FLAGS AND COUNTERS 







DVIDIXJ 
U^iIT0l 
DNITll 
DRVNJ 
CMC I 
UTT! 
UT{ 
WTFl 
TA J 
SA! 
lASAVl 
SASAVJ 
WDCNTi 11 
DENSTYI 
DENi 
TOMLTJ 
TOCNTi 
I^■TI % 
UTDONEl 
TSSFLGI 
INLOOPJ 
ITBYPSS 
PKPYPSJ 
RTPYFL! 
MXtRCTi 
SERFLl 
FIN J 



JHOLDS WHICH DRIVES TO TEST 

niNIT FLAG 

I UNIT 1 FLAG 

IDRIVE NUMBER 

jCOWMAND SAVE 

JUNIT UNDFh TEST 

jUNIT Uf^DER COMMAND 

JWRITE FLAG 

jCURPENT TRACK ADDRESS 

{CURRENT SECTOR ADDRESS 

ISTARTING TRACK ADDRESS SAVE 

{STARTING SECTOR ADDRESS SAVE 

jWORD CCOUNTER 

JDE^SITY 

IDENSITY FLAG 

JTIME OUT MULTIPLIER 

jTIME OUT COU'^TER 

IINTIALIZE FLAG 

JUNIT DONE FLAG 

JTSS DONE ti^ITH UMT FLAG 

Jll** LOOP FLAG 

IRESTART INIT Bl^PASS FLAG 

jPREAK BYPASS FLAG 

JPETRY FLAG 

|NON EXISTENT MFMORY ERROR COUNTER 

{STATUS ERROR FLAG 

jFI^Jl FLAG 



-TEMPORARY STORAGE REGISTERS 



SPXCSI 

SRXESt 

SRXTAj 

SRXSAI 

SRXSBl 

SRXSBll 

SRXSB2! 

SPXSP3J 

DECVAi SPXSB 
.+2 
. + 2 



{DEFIMITIVE ERROR CODE VIRTUAL AUH 
{DEFINITIVE ERROR CODE PHYSICAL ADR 
{DEFINITIVE ERROR CODE EXTENDED ADR BITS 



.-.--CONSTANTS 

RXCS{ 177170 

PXOB! 177172 

VECl 264 

VARIFYI ni 



{RX02 COMMAND REGISTER - ADDRESS 

{PX02 DATA BUFFER - AnUPESS 

{VECTOR 

{VARIFY WD FOR SET UENSITY-ASCII "I" 
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375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 ' 

389 

390 

391 

392 

393 

394 

395 

396 

397 

398 

399 

400 

401 

402 

403 

404 

405 

406 

407 

408 

409 

410 

411 

412 

413 

414 

415 

416 

417 

418 

419 

420 

421 

422 

423 

424 

425 

426 

427 

428 

429 

430 
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GINRPUTINF (MOnULF 0,0 -- CONTROL) 
START 

IMTIALIZF 

CALL MOD l.f - INITIALIZE DEVICE 
CALL MOD 6,^ - CHECK STATUS 
RESTART 
BEGINDO 

INLOOP NOT SET 
THEN 

F IKITIALIZE.RYPASS NOT SET 

THEN-INITTALIZE-TRACK 4, SECTOR 
NDIF 

F FTNl.FLAG NOT SET 
THE^ 

CALL MOD 2.0 - OUTPUT (WRITE) 
F FINI.FLAG NOT SET 
THEN 

CALL MOD 3.0 - INPUT (READ) 
IF FINI.FLA& NOT SET 
S THEN 

I CALL MOD 4.0 - PROCESS SECTOK 
; SET INLOOP«FLAG ^ CALL ITERATION 
FNPIF 
^DIF 
FNMF 
EMriF 

CLEAP INLOOr 

SET INITIALIZE.BYPASS FLAG 
IF SECTOR.noNF.FLAG SET 
I THEN 

I CLFAP SECTOP.DOME.FLAG 
! CALL MOD 8.0-UNlTS DONE CHECK 
F UNIT.DONE SET 
THEN 

SET TRACK. ADRaTRACK.ADR+10, 

IF TRACK ADR > 76 

} THEN-SFT TRACK.ADRcTRACK.ADR SAVE 

NCpEMENf sECtOr.ADOpEsS-SAVE S, CLEAR I^J ItI ALI ZF.HypASS-FLAG 
F SECT0R»ADDRESS-.SAVE = 4 

then 
set sector.addpess„save=i 
increment tpack„addhesvs»save 

IF TRACK.ADDRESS.SAVEsil, 
I THEN 

I SET TRACK. ADDRESS-SAVE=1 
I COMMENT DENSITY-FLAG 
! CALL MOD 7,0 - SET DENSITY 
ENDIF 
NDIF 
ENDIF 
I ENDIF 
ENDIF 

CALL MOD 5.0-SELECT UNIT FOR TEST 
DOUNTIL FINIaJ 
riNI— >END 
jENDROUTINE 



SEQ 1*5009 



) 
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431 
432 
433 
434 
435 
436 
437 
438 
439 
44P 
441 
442 
443 
444 
445 
446 
447 
448 
449 
450 
451 
452 
453 
454 
455 
456 
457 
458 
459 
460 
461 
462 
463 
464 
465 
466 
467 
468 
469 
470 
471 
472 
473 
474 
475 
476 
477 
478 
479 
480 
481 
482 
483 
484 
485 
486 



PI00376' 
O0040s^' 
k'00404' 
000412' 
000420* 
000426' 
000432' 
000436' 
000442' 
000446' 
000452' 
000456' 
000462' 
000466' 
000472' 

000500' 

000506' 
000510' 
000514' 
000516' 
000524* 
000532' 
000534' 
000542' 
000544' 
000552' 
000560' 
000562' 
000570* 
000570' 
000576' 
000604' 

000610' 

000616* 
000620' 
000626' 
000632' 
000636* 
000642' 
«00644' 
000650' 
000654' 
000656' 
000662' 
000666' 
000670' 
W00674' 
000676' 
000702' 
0007P4' 
000712' 
000720' 
000724' 
000726' 
000734' 



000240 
016706 
012767 
f 12767 
012767 
005067 
005067 
005067 
005067 
005067 
005067 
0P15067 
005067 
005067 
016767 
122737 
001033 
105737 
001013 
042767 
032767 
001421 
012767 
000412 
042767 
032767 
001406 
012767 

104403 
012767 
004767 
032777 

001005 

104403 
000167 
004767 
005767 
001145 
004767 
005767 
001140 
005067 
004767 
000240 
005767 
001042 
005767 
001006 
016767 
016767 
005767 
001026 
104415 
104414 



177426 

00000! 

000001 

000100 
177704 
177650 
177642 
177606 
177604 
177606 
177576 
177646 
177640 
177316 
000015 

000040 

000001 

000001 



;MOD 0, 
SIAPT; 



177664 
177660 
177654 



177552 

000041 



177526 
177262 



000260 004662 



000002 

000002 



177500 
177234 



000261 004634 



000000' 
000001 

002470 
00400(^ 

000000' 
000324 
000324 
177474 

001364 
177462 

177432 

001256 

177426 

177423 

177370 
177360 
177412 

00000?^' 
000000 » 



005510' 
177510 

177550 

005476' 



NUAVi 

riPSTj 



BESTPTi 
PGNDOl 



177362 
177352 



COM 
NOP 
MOV 
MOV 
MOV 
MOV 
CLP 
CLP 
CLP 
CLP 
CLP 
CLP 
CLP 
CLP 
CLP 
MOV 
CMPB 
BNE 

BNE 

BIC 

BIT 

EFQ 

MOV 

PR 

BIC 

PIT 

BEQ 

MOV 

MSGNS# 
MOV 
JSP 
BIT 

BNF 

MSGNS, 

JMP 

JSP 

TST 

BNE 

JSP 

TST 

BNE 

CLP 

CALL 

NOP 

TST 

BNE 

TST 

BNE 

MOV 

MOV 

TST 

Bf.'E 

gf.tPas 

GWB'IFS 



TPOL -- PPOfESS SECTORS 



SPOINT»SP 

SI ,TASAV 

«1 fSASAV 

#100#wnCNT 

FIN 

DEN 

DFNSTY 

UNIT0 

UMITl 

UTT 

D»Vf^ 

SFPFL 

NXEPCT 

DVID1,DVID1X 

»l5,a»41 

FIRST 

aj<40 

Dl 

«i »Dvinix 

»l#DVIDl 

FIRST 

»?60,DNUM 

NI'AV 

»2,DVID1X 

»2»nviDl 

FIRST 
«2fit »nNUM 

BEGIN»NUNT 

!tl,INT 

PC»VSET 

84000, apxcs 

GO 
RFC TN, DPP 4 

FIM 

PC, JNTIAL 

FIN 

FINl 

PCiSTATUS 

FIN 

FINT 

INT 

SFLD 

I'lLOOP 
B»<LOOP 
ITBVPS 
EOPY'PS 
SASAV,SA 
TASfiV,TA 
FIN 

BKLOOP 
BEGIN* RRllFVA 
BFGIH 



INITIALIZE STACK 

PRESET TRACK ADDRESS SAVE 

PRESET SECTOR ADDRESS 

SET WORD COUNT FOP SINGLF DENSITY 

CLFAR FINI FLAG 

CLEAR DENSITY FLAG 

CLEAR DENSITY 

CLEAR UNIT>I0 AVAIL FLAG 

CLFAR UMTM AVAIL Ft-AG 

CLEAR UNIT UNDER TEST 

CLEAR DRIVE « 

CLFAR STATUS ERR FLAG 

CLEAR NON-FXISTENT MEMOhY FRFOP COUNT 

GET DRIVE COUNT 

IF RX02 FLOPPY WAS LOAD MEDIUM 

THEN 

IF DRIVE 

THEN 

KILL TEST FOR DRIVE 3 

WAS IT TO BE TESTED? 

BR IF NO 

SET DRIVE » FOP PRINT 

RP TO NOT AVAIL MSG 

KILL TFST FOR DRIVE 1 

IF WAS TO BE TESTED 

THEN 

SET DRIVE SI FOR PRINT 

ASCII MESSAGE CALL kvItH COMMON HEADER 

SET INIT FLAG 

GO SETUP ADDRESS & VECTOR 

TF DEVICE IS 

RX01 THEN 

ASCII MESSAGE CALL WITH COMMON HEADER 

GO DROP MODULE 

INITIALIZE DEV1CE---D0 MOD 1,0 

IF FINI FLAG 

NOT SET THEN 

CHECK STATUS--------DO MOD 6.0 

IF FINI FLAG 

NOT SET, THEN 

RESET INIT FLAG 

GO SELECT UNlT---------rO MOD 5,0 



IF INLOOP 

^'nT SET, THEN 

IF UNITIALIZE BYPASS FLAG 

NOT SET, THEN 

PRESET SECTOR STARTING ADDRESS 

PRESET TRACK STARTING ADDRESS 

IF FINI FLAG 

NOT SET, THEN 

SGET PHYSICAL ADDRESS FRO!' 
GET WRITE BUFFER INFORMATION 



Ib-BIT RBUFVA 
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487 


000740' 


004767 


000266 




WPITEi 


JSR 


DC, OUTPUT 


488 


000744* 


005767 


177366 






TST 


FIN 


489 


000750* 


001014 








BNE 


BKLOOP 


490 


000752' 


004767 


000602 




FEAC! 


JSP 


PC, INPUT 


491 


000756' 


005767 


177354 






TST 


FTrj 


492 


000762' 


001007 








BNF 


e^LOOF 


493 


000764' 


004767 


001116 






CALL 


TSS 


494 


000770* 


012767 


000001 


177324 




MOV 


t1,INL00P 


495 


000776* 


104413 


000000' 






endtts 


BEGIN 


496 
















497 


001002* 


005067 


177314 




BKLOOP! 


CLP 


IN'LOOP 


498 


001006* 


012767 


000001 


177310 




MOV 


»t »ITPYPS 


499 


001014* 


005767 


177 3fr}0 






TST 


TSSFLG 


500 


001020' 


001453 








BFQ 


DOUNTL 


501 


001022* 


0050ft7 


177272 






CLR 


TSSFLG 


502 


001026' 


004767 


002214 






CALL 


UONCK 


503 


1.01032' 


005767 


17726^ 






TST 


UTPONE 


504 


001036' 


001442 








BEO 


IS 


505 


001040' 


062767 


00001 2 


177224 




ADD 


»12»TA 


506 


ki01046' 


022767 


000114 


177216 




CMP 


»1 14,TA 


507 


001054' 


103033 








BHIS 


IS 


508 


001056' 


016767 


177214 


177206 




MOV 


TASAV,TA 


509 


001064' 


005067 


177234 






CLP 


ITBYPS 


510 


-^01070' 


005267 


177204 






INC 


S*SAV 


511 


001074' 


022767 


0001^04 


177176 




CMP 


a4,SASAV 


512 


001102* 


001020 








BNE 


IS 


513 


001104* 


012767 


000001 


177166 




MOV 


«I»SASAV 


514 


001112' 


005267 


177160 






INC 


TASAV 


515 


001 1 16' 


022767 


00001 3 


177152 




C^^P 


Ml.fTASAV 


516 


001 124' 


001007 








BNE 


IS 


517 


001125' 


012767 


000001 


177142 




MOV 


#1, TASAV 


518 


001134' 


005167 


177146 






COM 


DFN 


519 


001 14^1' 


004767 


0015 70 






JSR 


PCDENCH 


520 


001 1 44' 


004767 


0007 7 4 




IS! 


CALL 


SFLD 


521 


001150' 


005767 


177162 




dountlj 


TST 


FIN 


522 


001154' 


001644 








BEQ 


RFSTPT 


523 


001156' 








FINI: 






524 
525 


001156' 


104410 


000000' 






ENDS,BEGP' 



jGO WRITE-------------DO MOD 2,0 

ITEST FINI FLAG 
!lF SET THEN BR 
jGO READ-------------''DO MOD 3 . to 

;TEST FINI FLAG 

JIF SET THEN BR 

;G0 UPDATE SECTOR - DO f-On 4.0 

JSET INLOOP FLAG 

ISIGNAL END OF ITERATION. 

JMOMTOP SHALL TEST END OF PASS 

jCLEAP INLOOP FLAG 

SSET INITIALIZE BYPASS FLAG 

jIF UNIT TSS 

J IS DONE, THEN 

jCLEAR FLAG FOR TSS DOnE 

JCALL UNIT DONE CHECK • DO MOD 8, 

J IF UNIT DONE 

J NOT SETi THEN 

{INCREMENT TRACK ADDRESS 

JSEE IF DONE TRACKS 

jIF NOTI BR 

JPESET TRACK ADDRESS 

jCLEAR INITIALIZE BYPASS FLAG 

1BUMP STARTING SECTOR ADDRESS 

J IF SFCTORS = DONE (THREE) 

J THEN 

fPESET STARTING SECTOR 

IRUMP STARTING TRACK ADDRESS 

I IF TRACKSsDONE (TEN) 

JTHEN 

jRESET TRACK STARTING ADDRESS 

JCHANGE DENSITY 

jSET DEVICE DENSITY 

JSELECT UNIT DO MOD 5.0 

;D0 UNTIL FIM FLAG 
JSET 

IDROP THE MODULE 
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526 
527 










;MOD 1, 


INTTALIZF. DEVICE - 




528 


001J62' 


012767 


040000 


177072 


IMTIAL! 


HOV 


»40000.CMn 


JSET INT COMMAND 


529 


03} 170' 


016777 


177066 


177170 




MOV 


CMD,9RXCS 


IINII UNIT ^ 


530 


001176' 


004767 


003142 






JSP 


PCAWDN 


>G0 AS^AIT DONE 


531 


00125»2' 


t^05767 


17713P 






TST 


Firi 


HF FINl FLAG 


532 


001206' 


001010 








BNE 


ENDINT 


lEQUALS ZERO THEN 


533 


001210' 


005777 


177152 






TST 


I3RXCS 


ISEF IF ERROR ON INIT 


534 


001214* 


100005 








BPL 


ENiDINT 


lIF NOTJ BH 


535 


0^1216' 


104403 


000000' 


005450' 




MSGN8, 


PFC.iN,nppi 


lASCII MESSAGE CALL WITH COMMON HEADER 


536 


001224' 


004767 


002564 






JSR 


pr,TURP 


»nO TEST DROP CLEAN-UP 


537 
538 
539 
540 
541 
542 


00 12 30' 


000207 






KNDINTI 


PTS 


PC 


fOETUPN 


jMOD 2. 
OUTPUTI 


WPITE 
MOV 


ctlRDfMITTKir Hi... 




001232' 


k;l2767 


000001 


177030 


#1 ,WTF 


JSET WBTTf FLAG 


543 


001240* 


004767 


000134 






JSR 


PC»nURUF2 


ITHFN O/P RX02 BUFFER - DO MOD 2,1 


544 


001244' 


0!^5767 


177066 






TST 


FIN 


>IF FINI FLAG 


545 


001250' 


001050 








BNE 


F^JDOUT 


JFQUALS ZERO THFN 


546 


001252' 


0127fi7 


000260 


004150 




MOV 


«260,RTYN 


jREEET RETRY COUNTER-ASCII "0" 


547 


t'ei 260' 


016767 


177000 


176774 


HI 


HOV 


UTT,CMD 


JSELECT DRIVE 


548 


001266' 


052767 


000105 


176766 




BIS 


8t05»CMD 


jSET TO WRITE SECTOR + IN? ENABLE 


549 


001274' 


056767 


177004 


176760 




BIS 


DFNSTY»CMP 


JSET DENSITY 


55f? 


001302' 


016777 


176754 


177056 




MOV 


C^'D,apxCS 


{LOAD COMMAND 


551 


001310' 


004767 


003140 






JSP 


PC#AWTP 


5G0 AWAIT TRANSFER READY 


552 


001314' 


0057^7 


177016 






TST 


FIN 


>TF FINI FLAG 


553 


001320' 


001024 








BfT. 


E'lDOUT 


1 EQUALS ZERO THEN 


554 


001322' 


016777 


176746 


177040 




MOV 


SA,PRXDB 


jLOAD SECTOR ADDRESS 


555 


001330' 


004767 


003120 






JSR 


■ PCfPWTP 


JGO AWAIT TRANSFER READY 


556 


001334' 


005767 


176776 






TST 


FIN 


fTF FINI FLAG 


557 


001340' 


001014 








BNE 


E^;^OUT 


JFQUALS ZERO THEN 


558 


001342' 


016777 


176724 


177020 




MOV 


TA,flPXDR 


ILOAD TRACK ADDRESS 


559 


001350' 


004767 


001764 






JSP 


pr, INTER 


JWAIT FOR INTERRUPT 


560 


001354' 


005767 


176756 






TST 


FIN 


}IF FIM FLAG 


561 


001365?' 


001004 








B».'E 


F^'DOUT 


f^'OT SET, THhN 


562 


001362' 


022767 


0000!'3 


176740 




CMP 


«3fPTRYFL 


JIF RETRY FLAG 


563 


t^01370' 


001333 








BNE 


IS 


fEQUALS 3 THEN 


564 


001372' 


005067 


176672 




ENPOUTI 


CLR 


WTF 


jCLFAR WRITE FLAG 


565 
566 


001376' 


000207 








RT5 


PC 


JRETURN 



) 
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567 
568 
569 
570 
571 
572 
573 
574 
575 
576 
577 
578 
579 
580 
581 
582 
583 
584 
585 
586 
587 
588 
589 
590 
591 
592 
593 
594 
595 
596 
597 
598 



001 4 0e' 

001 406' 
001414' 
001420' 
001422' 
001 426' 
001434' 
001440' 
001 444' 
001446' 
001 45 4' 
001460* 
001 464' 
di^M 470' 
001 47 4' 
001476' 
0';il 50 4 ' 
0c^l510' 
001514' 
0'^1516' 
001522' 
001526' 
001530' 
001534' 

001542* 

001550' 
^-C1556' 



;MOD 2.1 OUTPUT BX02 BUFFER 



012767 000001 176654 0UBUF2J MOV 



056767 
016701 

000301 

050167 
016777 
004767 
005767 
001044 
016777 
005267 
004767 
005067 
005767 
001030 
016777 
00 4767 
005767 
001020 
004767 
005777 
100013 
004767 
012767 



176672 
176516 

176634 
176630 
003014 
176672 

17663H 
176646 
002770 
176636 
176642 

176432 
002634 
176622 

002442 
176640 

0f=i2526 

000035 



104405 000000' 000000 
104402 00000c«' 005442' 



BIS 


DENSTYiCMD 


MOV 


wt^UFEA,?-! 


SWAB 


R1 


PIS 


PI ,CMD 


MOV 


C*'D,PiRXCS 


JSR 


PC, At^TR 


TST 


FTN 


BNfc 


FNnDU2 


MOV 


wncNT,(apxDb 


IMC 


RVRVPS 


JSP 


PCAWTR 


CLP 


Bi'BYPS 


TST 


FIN 


B^'E 


END0U2 


MOV 


wr-UFPA,aRXDP 


JSP 


pr,AWDN 


TST 


FIf-' 


E>NE 


E^!^0U2 


CftLL 


CKNXEP 


TST 


8PXCS 


BPL 


h> D0U2 


CALL 


SUPTpr. 


NOV 


»15,FPRTyP 



;SET FILL BUfFFR COMMAND 

SSET DENSITY 

;GET FXT, ADH. BITS 



J 



BITS 



;SEI CXr. ADR. 
iLOaO COMMAND 
jWAir FOR "TR" 
!TF FINI FLAG 
; Equals zero THE^ 

;lopd ^opr cou^it for output bufi-ep 

jSET BREAK BYPASS FLAG 

;s-.AlT FOP "TR" 

jCLKAP BREAK BYPASS FLAG 

JIF FIM FLAG 

JEOUAIS ZERO THF^J 

»LOAD BASF ADDPFSS FOR OUTPUT BUFFER 

>'/AIT FOR "DOME" 

HE FINI FLAG 

» EQUALS ZERO THEN 

?CALL CHECK NON-EXISTENT ^'E'-'ORY ERRORS 

jTF DEVICE FPPOP BIT 

J IS SET THE« 

jCALL SETUP PPIrJT REGISTERS 

JSETUP FILL BltFEER ERROR 

HRDERS,RFr.Uj,NULL > BUFFER FILL ERROR 

M5;GSS,BEGIN,BEEP2 ! ASCII MESSAGE CALL WITH NO HEADER 



ENrOU?! PTS 



PC 



{RETURN 
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599 j^'OD 3.0 READ SUBPOUTINK --------------------------------------- 

600 

601 0P1560' 012767 00P26vi 0P3642 INPUTj MOV »260,PTY^i jRESFT PETRY COUMER-ASC 1 1 "0" 

602 001566' 016767 176472 176466 ISl MQV UTT»CMD JSEltCT DRIVE 

603 *'»1574' 052767 000107 17646P! BIS #107, CMD iSET READ COMMAND + INT fcNB 

604 0016t*2' 056767 176476 176452 BIS DFNSTY.CMD JSET DENSITY 
6iy5 001610* 016777 176446 176550 M^V Cf"D,PRXrs jLOAD COMHAND 

606 001616' 004767 002632 JSP PCAwTR JGO ASvAIT THA^SFEH READY 

607 001622' 005767 176510 TST FIN jIF FINI FLAG 

608 001626' 001023 BfJf EWDIM ;^0T SET* THEN 

609 001630' 016777 176440 176532 HOV SA,PRXDP jLOAD SECTOR ADDRESS 
61y1 001636' 004767 002612 JSR PCrPWTR ;G0 A'*AIT TRANSFER READY 

611 001642* 005767 176470 TST FT^ jIF FINI FLAG 

612 0C1646' 001013 PNE E^DIM J^OT SET# THEf 

613 001650' 016777 176416 176512 f'fW TA^PRXDP jLOAU TRACK ADDRESS 

614 k501656' 004767 001456 JSR Pr,JNTEP l^AIT FOR INTERRUPT 

615 001662' 022767 00«fi03 176440 C^'P «3,RTRYFL fIF RETRY FLAG 

616 001670' 001336 RNE IS {EQUALS 3, THEN 

617 001672' 004767 000002 JSR PC,TNRUF2 jIHEN GET RX02 PUFFFR - DO MOD 3.1 
61R 001676' 000207 ENDINJ PTS PC {RETURN 

619 ;—.. — . — ...- 
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620 jMOD 3.1 INPUT pXi-'2 B"FFF'^ ------------------------------------- 

621 

622 001700' 005767 176434- I'JPUF?! TST S^^PFL jIK STATUS ERROR NOT SET 

623 001704' 001077 BNE E'-DIM? ;THEN 

624 001706' 012767 0000e3 176346 MOV 8^,CMn jFET EMPTY Hl'FFC-R COMMAND 

625 0fil7l4' 056767 176364 176340 bJS DFNSTY,CWD jSET DENSITY 

626 001722' 016701 1762^2 mov P^UFEA,R1 jGET FXl, ADP. BITS 

627 001726' 000301 s^'AB PJ ; 

628 0f^l73(f'' 050167 176326 BTS B\,C'^t ;SET EXT, ADP. HITS 

629 001734' 116777 176322 176424 mqv CND^apXCS JEISE LOAD COMMAND 

630 k)0l742' 004767 0025^6 J£P PC, AWTR |*A1T FOR "TR" DO MOD U.TR 

631 001746' 005767 176364 TST ETH JiF FINI FLAG 

632 W01752' 001054 HNE E:DI"42 jEgi'ALS ZEP'^ 

633 001754' 316777 176372 176406 MOV WPC^'T»»PXDB ITHEf^ LOAD '<fORn COU^'T FOR INPUT BUFFFP 

634 001762' H05267 17634(> K-C RKBYPS ;SET BREAK BYPASS FLAG 

635 001766' 004767 002462 JSR PC, AWTR JwAIT FOR "TR" DO MOD U.TH 

636 001772' 005067 17b33'" CLP Bi-byPS jCLEA" BREAK hYPASS FLAG 

637 001776' 005767 176334 TST FTf JlF FINI FLAG 

638 002002' 001040 Bf;L FVDIM2 ;EQUALS ZERO 

639 002004' 016777 176116 176356 mOV RBUFPA»flPXDB .'THEN LOAD BASE ADDRESS FOR l^'PUT t-UFFLR 

640 002012' 004767 »02326 JSR PC,AWDN {'•''^IT FOR "DONFi' 

641 002016' 005767 176314 IST FTN -ip FINI FLAG 

642 002022' 001030 BFE E''DTN2 ; EQUALS ZERO TmFN 

643 e02024' 005777 176336 tst apxcs SlF DEVICE ERROR BIT 

644 002030' 100021 BPL IS jSET, THEN 

645 002032' 004767 (202126 CALL C'<nxER JCALL CMECK NOK'-tXlSTE^T "E^'ORy tRROPS 

646 002^36' 005777 176324 TST 0PXCS jTF DEVICE FRROP BIT 

647 002042' 100020 HPL E?iDIN2 !15 STILL SET, THF^ 

648 007044' 004767 002212 CALL SUPTRG jCALL SETUP PPI^-T REGISTERS 

649 (-02050' k.l2767 000?3/i 176030 MOV «10,ERRTYP JSETUP DATA TRANSFER EPPOp 

651 002056' 104405 000000' 000000 hPPFPS , BEGIN , NULL jEMPTY BUFFER ERROR 

*'52 • *#*«»»•»#«•»»#«»«#*#*«»*»»«»«»»*»#■»»»####*♦#»»##« «#«#«4HHHH( »♦#*«* 

653 002064' 104402 000000' 005434' MSGSS , BFGIH , BFEp 1 • ASCII MESSAGE CALL KITH NO HEADER 

654 002072' 000404 Fp ENDIN2 |PR TO EXIT 

655 002074' iSi 

656 002074' 104412 000000' 000126' CPATAS .BEGP' , PRUF PA j REQUEST FOR ^■0N^rOp TO CHEC^ DATA 

657 002102' 002104' .+2 , IF ERROR, CONTINUE 
65P .^02104' 000207 E'JDIN2} PTS PC iPETURN 

659 ; : 



» * 



PXBC DEC/XU SYSTEM IXERCIS^'R MODULE 
XPXBCP.Pll 05-APR-79 11|52 



^'ACYU 306(10525 05-APR-79 11154 PAGE 17 



6b0 
661 










;»'0D 4, 


,0 SECTOR 


UPDATE -- — ---. 




662 


(!)02106' 


062767 


000003 


176160 


TSSI 


ADD 


»3,SA 


JBUMP SECTOR ADDRESS 


663 


002114' 


022767 


0000 3 3 


176152 




C^'P 


«33,SA 


JSEE IF DONE SECTORS 


664 


0»'«2122' 


101401 








PIOS 


IS 


jIF SOi BP 


665 


i?02124' 


000406 








BP 


E^DTSS 


IPETURN 


666 


002126' 


016767 


176146 


176140 


ISI 


V,PV 


SASAV,SA 


rRESET SA 


667 


002134' 


012767 


000001 


176156 




MOV 


#1#TSSFLG 


ISET TSS FLAG- (UNIl PONt WITH TSS) 


668 
669 
670 
671 
672 


002142' 


000207 






ENDTSSI 


1 PTS 


PC 




j^'OD 5. 


,0 SELECT 


U'^'IT FOR TEST < 














673 


002144* 


005767 


176110 




SELDj 


T5T 


DRVN 


fSEF IF DRIVE 


674 


002150' 


001415 








BEQ 


2S 


;1F S0» BP 


675 


002152* 


005067 


176102 






CLP 


DRVM 


)ELSt SET TO 


676 


H02156' 


005767 


176074 






TST 


U^ITl 


JSEE IF UNIT 1 AVAILABLE 


677 


002162' 


001401 








BFO 


IS 


!IF SOJ BP 


678 


002164* 


000767 








8P 


SFLD 


JGO SEE IF UNIT IS AVAILABLE 


679 


002166* 


012767 


000020 


176070 


ISI 


MOV 


»20,UTT 


ISET UNIT UNDER TEST 


6fl0 


002174* 


012767 


000261 


003222 




MOV 


»261,DNUM 


JSET DRIVE NUMBER FOR PRINTS 


681 


002202* 


000413 








BR 


FMDSEL 


IRETURN 


6P2 


002204' 


005167 


17605'''' 




2S! 


COM 


PPVN 


jSi^lTCH UNITS 


683 


002210' 


005767 


176040 






TST 


U^'IT0 


>SEE IF UNIT AVAILABLE 


684 


002214' 


001401 








BEQ 


3S 


lIF 501 BR 


685 


002216' 


000752 








BR 


SFLD 


SSLLECT NEXT 


686 


002220' 


(r.'05067 


176040 




3S8 


CLP 


UTT 


ISELECT DRIVE 


687 


002224' 


012767 


000?6k^ 


003172 




MOV 


i260,DNUM 


?SET ORIVF NUMBER FOR PRINTS 


686 
689 


002232' 


000207 






ENDSELi 


1 RTS 


PC 


jRETURN 



) 
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690 
691 










;MOD 6, 


,0 DEVICE STATUS --- 




.... 


692 


002234' 


00024fi 






STATUS J 


! NOP 








693 


002236' 


004767 


0^0120 




U0J 


JSP 


pr,iiNT0 


JCHECK STATUS UNIT P - DO 


^'UD 6.1 


694 


002242' 


005767 


176006 






TST 


UFJIT0 


!TF UNIT IS 




695 


002246' 


M01012 








BNE 


Ul 


SAVAIL , THEN 




696 


002250' 


005767 


176040 






TST 


r:T 


}IF IN IT FLAG 




697 


002254' 


001407 








BFQ 


Ui 


IIS SET. THFN 




69<? 


002256' 


005067 


176002 






CLP 


UTT 


;5ET UNIT=0 




699 


002262' 


012767 


0P0260 


003134 




MOV 


Jt260»DNUN 


ISET DRIVF « FOB PRINT 




700 


002270' 


004767 


000322 






JSR 


pr, ONSET 


ISETUP DFMSITY UNIT - DO 


"OU 6.3 


701 


002274' 


004767 


000200 




Ul! 


JSP 


PCUNTl 


ICHFCI* STATUS U^UT 1 - 00 


N'OD 6,2 


702 


002 30''!' 


005767 


175752 






TST 


UMTl 


lIF U^JIT 1 IS 




703 


002304' 


0PI101 4 








PME 


IS 


lAVAlL, THEN 




704 


002306' 


005767 


1760("2 






TST 


INT 


IIF INIT FLAG 




705 


002312' 


001422 








BFQ 


E'-UST 


lis SET, THEN 




7i^6 


002314' 


01276 7 


0001 2'-" 


175742 




MOV 


»70a)TT 


ISET UMT=l 




707 


H02322' 


(112767 


0vH'.261 


003074 




MOV 


»7b\ ,DNUM 


ISET DRIVE ft FOO PRINT 




708 


002 3 30' 


004767 


0f'0262 






JSP 


PC, ONSET 


ISETUP DENSITY U^'IT 1 - DO 


'■'OD 6,3 


709 


^102334' 


H00411 








BP 


E^rsT 


jRR TO END STATUS 






002336* 


005767 


175712 




ISJ 


TST 


UMT0 


IIF UNIT 






002342' 


001406 








BEQ 


Ei'DST 


|NOT AVAIL, THEN 






1)02 34 4' 


104403 


000P0r^* 


005 460' 




MSG^S, 


BFGIf'»0PP2 


lASClI 'MESSAGE CALL wiTh COMMON HF.^OEH 




002352' 


012767 


0000H1 


175756 




MOV 


it\,¥lH 


IGO DROP MODULE 






n02 360' 


(-100207 






E'JUSTJ 


PTS 


PC 


IRETURN 












;MOD 6. 


1 UNI''' '" c T a T 1 1 c 
























002362' 


032767 


00f'001 


17566? 


UNT0J 


BIT 


81»r)VIDlX 


IIF UJIT 






002370* 


tUM4 37 








BFQ 


IS 


ISELECTED, THEN 






H02372' 


t'12767 


00t^0 1 i 


175662 




MOV 


»13»CMD 


IREAD STATUS UNIT 






002400' 


056767 


175700 


175654 




PIS 


DFNSTYifMP 


ISET DENSITY 






002406' 


016777 


175650 


175752 




MOV 


C^^D,0PXCS 


ISENO COMMAND 






002414* 


004767 


00172 4 






JSR 


PC»AWDN 


IGO AWAIT DONE 






M02 4 2t''' 


005767 


175712 






TST 


FIN 


lIF FINI FLAG 






002424' 


001024 








BNE 


Ei^DliT0 


IFQUALS EEPO THEN 






002426' 


017700 


175736 






MOV 


(aRXDB,Ri? 


J GET RXFS 






002432' 


032700 


00020^" 






BIT 


ti200»P0 


IIF DRIVE PDY 






002436' 


001017 








PNE 


E»iDliT0 


;NOT SET, THEN 






002440' 


012767 


000260 


W02756 




MOV 


«26(^0NtiM 


ISET DRIVE « FOR PRINT 






002446' 


012767 


000006 


175432 




MOV 


8h,FRPTYP 


















J «#«#«»««#»#»«»»«##«*# 






002454' 


104405 


0O000f'' 


000000 




HPDER8 


i,BEGIM,NULL 


lUNIT NOT AVAILABLE 
















;*»*»■« 






002462' 


104402 


0000011* 


005510' 




MSGSS, 


BEGIN, NUNT 


1 ASCII MESSAGE CALL kiTH NO 


HEADER 




002470' 


012767 


177777 


175556 


ISI 


MOV 


«-l#UNlT0 


IDESELECT UNIT 






002476' 


000207 






FNDUT01 


1 PTS 


PC 


IPETURN 














I------ 
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74v^ 
741 










•MOD 6, 


2 "NT 


T 1 STATUS ----- 




742 


P02500' 


032767 


000002 


175544 


UNTIJ 


BIT 


«2,DVID1X 


JIF UNIT 1 


743 


k)025C«6' 


001437 








BEO 


IS 


ISELECTED* THEN 


744 


0025)0' 


012767 


000033 


175544 




FOV 


«33»CMD 


rREAD STATUS UNIT I 


745 


002516' 


056767 


175562 


175536 




BIS 


DFNSTY»CMn 


>SET DENSITY 


746 


002524' 


016777 


175532 


175634 




^'0v 


C^'D,apxrs 


jSEMD COMMAND 


747 


002532' 


004767 


001606 






JSH 


PC»AWDN 


JGO AWAIT DONE 


748 


0^2536' 


005767 


175574 






TST 


FIN 


>IF FIN I FLAG 


749 


002542' 


001024 








BNE 


ENPUTl 


^EQUALS ZERO THEN 


750 


002544' 


017700 


175620 






POV 


(»RXPB,P0 


IPEAD PXES 


751 


002550' 


032700 


000200 






BH 


«200#P0 


JIF DRIVE RDY 


752 


002554' 


001017 








BNE 


ENDUTl 


|NOT SET, THEN 


753 


002556' 


012767 


000261 


002640 




MOV 


«261,DNUM 


ISET DRIVE « FOR PRINT 


754 


002564' 


012767 


000006 


175314 




MOV 


«6»ERPTYP 




755 












1 »»»«»»*«♦»»#«»»»«*#»***•»»»*«#«*»»»»*«*•»«#»»##*«#*»*»»*»«*»»#«*« 


756 


002572' 


104405 


000000' 


000000 




HRDEP8,BEniN,NULL 


JUNIT 1 NOT AVAILABLE 


757 












J ««-»«4#»««««»« »#»««**»«*» *»»«»»»»«»»»#»»»#»«»»»*»*»* #*»#»«*»### 


758 


002600' 


104402 


00000fl' 


005510' 




MSGSS 


BEGIN, HUNT 


} ASCII MESSAGE CALL wiTH NO HEADER 


759 


002606' 


012767 


177777 


175442 


ISI 


MOV 


S-1»UNIT1 


IDESELECT UNIT 1 


760 
761 
762 
763 
764 
765 
766 


002614' 


000207 






ENDUTll 

1— ---- 


PTS 


PC 


jRETURN 


002616' 


012767 


000013 


175436 


;MOD 6, 
ONSETS 


3 ntVICE DENSITY SETUP 
MOV #i3,CMD 


fSET READ STATUS 


767 


002624' 


056767 


175434 


175430 




BIS 


UTTfCMD 


ISET UNIT 


768 


002632' 


016777 


175424 


175526 




MOV 


CfD,ePXCS 


;SEND COMMAND 


769 


002640' 


004767 


001500 






JSR 


PCAwDN 


JGO AWAIT DONE 


77H 


002644' 


00'?767 


175466 






TST 


FIN 


lIF FINl FLAG 


771 


002650' 


001030 








BNE 


XDNSET 


fIS ZERO, THEN 


772 


002652' 


012767 


00001 1 


175402 




MOV 


HUC^^ 


;SET SINGLE DENSITY 


773 


002660' 


056767 


175400 


175374 




BIS 


UTTfCMD 


>S£T UNIT 


774 


002666' 


016777 


175370 


175472 




MOV 


C^DraRXCS 


JSEND COMMAND 


775 


002674' 


004767 


001554 






JSR 


PC»AWTP 


IGO AWAIT "TR" 


776 


002700' 


005767 


175432 






TST 


ETN 


J IF FINI FLAG IS 


777 


002704' 


001012 








BNE 


XDNSET 


JZERO 


778 


002706' 


016777 


175462 


175454 




MOV 


VARlFy,0HXDb 


jSEND VAgIFY WORD 


779 


002714* 


104403 


000000' 


005716' 




M5GNS 


BFGINfSETSD'"' 


J ASCI I MESSAGE CALL WITH COMMON HEADER 


780 


002722' 


004767 


001416 






JSR 


PCiAWDN 


jWAIT FOR "DONE" 


781 


002726' 


004767 


000440 






JSR 


PC#SECK 


JGO CHECK FOR ERROR 


782 


002732' 


000207 






XONSET! 


PTS 


PC 


JRETURN 


783 
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784 
785 
786 


002734' 


000240 






;MOD 7. 
DENCH: 


DE' 
NOP 


^SITY CHANGE — 




787 


002736' 


005767 


175314 






TST 


UNITI 


IK UNIT 1 


788 


002742' 


001007 








BNE 


IS 


US aVAIL 


789 


002744' 


012767 


000020 


175314 




MOV 


«20#UT 


SET TO DO UNIT 1 


790 


002752' 


012767 


000 261 


002444 




MOV 


#261 .DNtiM 


SET DRIVE « FOR PRINT 


791 


002760' 


000405 








BR 


2S 


CONTINUE 


792 


002762' 


005067 


175300 




ISJ 


CLR 


UT 


ELSE SET TO DO UNIT 


793 


002766' 


012767 


00026" 


002430 




MOV 


«260,DNUM 


SET DRIVE « FOR PRINT 


794 


002774' 


005767 


17530b 




2S! 


TST 


DFN 


IF DENSITY FLAG 


795 


0030pifi« 


001051 








BNE 


55 


EQUALS ZERO (SINGLE DENSITY) THEN 


796 


003002' 


012767 


000111 


175252 


3SJ 


MOV 


«in,CMn 


SETUP SET DENSITY s SINGLE COM^«AND 


797 


003010' 


056767 


175252 


175244 




PIS 


UT,CMD 


SETUP UNIT UNDER TEST 


798 


003016' 


016777 


175240 


175342 




MOV 


C^'U, PPXCS 


SEND COMMAND 


799 


003024' 


004767 


001424 






JSP 


PC»AWTP 


SnAIT for "TR" 


800 


003030' 


005767 


175302 






TST 


FTN 


IF FINI FLAG 


801 


003034' 


001103 








BNE 


E^DDNC 


FQI'ALS ZERO THEN 


802 


003036' 


016777 


175332 


175324 




MOV 


VAPIFY,(apXDB 


SEND VARIFY C0"1MAND 


803 


003044' 


104403 


000000* 


005734' 




MSGNS 


BEGIN, SSGLDN 


ASCII MESSAGE CALL v«lTB COMMON HEADEF 


804 


003052' 


004767 


000262 






JSR 


PC, INTER 


WAIT FOR "DONE" & INTERRUPT 


805 


003056' 


005767 


175254 






TST 


FTN 


IF FINI FLAG 


806 


003062' 


001070 








BNE 


ENDDNC 


EQUALS ZFRO THEN SET 


807 


003064' 


005767 


175176 






Tsr 


UT 


IF 


808 


003070' 


001411 








BFQ 


4S 


UNIT 1 i^AS DONE 


809 


003072' 


005067 


17517P. 






CLP 


UT 


SET TO DO UNIT 


810 


003-^76' 


012767 


00026M 


002320 




MOV 


8260, DNUM 


SET DRIVE « FOP PRINT 


811 


003104' 


005767 


175144 






TST 


UN'IT0 


IF UNIT 


812 


• 503110' 


0010t^ 1 








BNE 


4S 


IS AVAIL 


813 


003112' 


000733 








PR 


33 


SET UNIT t' DENSITY 


814 


003114' 


012767 


000000 


175162 


4SI 


MOV 


«0,DENSTY 


SET OENSITY=SlNGLE 


815 


003122* 


000450 








BR 


E^'DDNC 


BRANCH TO END 


816 


003124' 


012767 


000511 


I75l3fl 


5SS 


MOV 


#511, CMD 


ELSE SET DENSITYsDOUBLE COMMAND 


817 


003132' 


056767 


175130 


175122 




HIS 


UT,CMD 


SETUP UNIT UNDER TEST 


818 


f03l40' 


016777 


175116 


175220 




MOV 


C'-D,PRXCS 


SEh-D COMMAND 


81" 


003146' 


004767 


001302 






JSP 


PCAWTR 


WAIT FOR "TR" 


820 


t'03l52' 


005767 


175160 






Tsr 


UN 


IF FINI FLAG 


821 


003156' 


001032 








BNE 


ENDDNC 


EQUALS ZERO THEN 


922 


003160' 


016777 


175210 


175202 




MOV 


VApiFY,apXDB 


SEND VARIFY COMMAND 


823 


003166' 


104403 


000000' 


005750' 




MsGNS 


BEGIN, SDBLDN 


ASCII MESSAGE CALL WItH COMMON HEADER 


824 


003174' 


004767 


000140 






JSP 


PC, INTER 


KAIT FOP "DONE" & INTERRUPT 


825 


00 3200' 


005767 


175132 






TST 


FIN 


IF FINI FLAG 


826 


003204' 


001017 








BNE 


ENDDNC 


EQUALS ZERO THEN 


827 


003206' 


005767 


175054 






TST 


UT 


IF 


828 


003212' 


001411 








BED 


6S 


UNIT 1 WAS DONE 


829 


003214' 


005067 


175046 






CLR 


UT 


SET TO DO UNIT 1^ 


930 


003220' 


M12767 


000260 


002176 




MOV 


«260,DNUM 


SET DRIVE 8 FOR PRINT 


831 


003226* 


005767 


175022 






TST 


UNIT0 


IF UNIT 


832 


003232' 


001001 








BNE 


6S 


AVIAL 


833 


003234' 


000733 








BR 


58 


CONTINUE 


834 


003236' 


«^12767 


000400 


175040 


6SI 


MOV 


#400,DENSTY 


SET DENSITY c DOUBLE 


835 
836 


003244' 


000207 






ENDDMCI 

J--" --- 


PTS 


PC 


RETURN 
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837 .-MOD 9,V - UNIT DONF CHECK 

B39 003246' 005767 175012 UDNC 

840 003252' 001006 

841 R03254' 005767 174776 

842 l^0326w' 00H)03 

843 003262' 005067 17503'' 

844 P03266* 000403 

845 003270* 012767 00000I 175020 18| 

846 003276' 000207 XUON 

847 ;--- 



TST 


UTT 


llF U.UT 


PNE 


IS 


lUNDEP TEST, THEN 


TvST 


U^'ITl 


lIF UNIT 1 


BME 


1 S 


JftVAlLABLE* THE^ 


CIP 


UTDONE 


ICLEAP UNITS DONE FLAG 


BR 


X'IDNCK 


;PR TO MOD EXIT 


MOV 


jtl, UTDONE 


ISET UNITS DONE FLAG 


PETUP^' 




JPETURN 



949 .MOD U.VS VECTOP SET UP --------...--------------------------•---------- 

850 

851 003300' 016700 174504 VSETj MOV VKCTOP,R0 

652 Pk)3304' fcl2720 003344' MOV a^TPUPT* (P0)* JSET UP INTERRUPT HANDLES ADDRESS 

853 00331t^' 116710 174476 MOVP HP1,CR0) ;SET HP LEVEL 

854 003314' 016767 174466 175044 MOV AnDP,RXCS >SET ADDRESS OF HXCS 

855 003322' 016767 174460 175040 mqv AnDP,PXDP jGET ADDRESS OF PXCS 

856 003330' 062767 000002 175032 ADD »2#RXnp ;SET ADDRESS OF DATA BUFFER 

857 003336' 000207 PTS PC 

858 ;— -- — 

859 

860 ;MOD U.INTR INTEPPUPT HA^jDLER ----------- ----------------- 

861 

862 003340' INTER! 

863 003340' 104400 000000' EXITS, BEGIN JEXIT TO ^'ONItOp, MODULE WAIT FOR INTERRUPT. 

864 003344' NTPUPTI 

865 J - - - - ---- 

866 003344' 000004 0^0000' 00335?' F IPOS . BEGIN , l S t QUEUE UP TO CONTINUE AT IS AND RTl 

867 ;- — -- — - 

868 003352' 004767 000014 IS! JSP PC,SECK jGO CHECK FOP ERROR 

869 0'53356' 016700 174426 MOV VFCTOP»P0 JGET VECTOR ADDRESS 

870 003362' 005720 TST (P0)+ jPU^P POINTER 

87i 003364' 016710 174422 MOV BPl#(R0) JASSUPE RESET TO BR LEVEL 5 

872 003370' 000207 RTS PC jRETURN 

87 3 ; - 
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874 ;MOn U.EC STATUS EPPOF CHECK SUBROUTINE 

875 

876 003372' 005067 174736 SECK; CLP SFRFL jCLEAR STATUS ERROR FLAG 

877 003376' 057767 174764 174656 PIS PPXCSfC^'D JGET PXCS 

878 K.03404' t^05767 174652 TST C'^D jSEE IF ERROR 

879 003410' 100404 bMl IS JIF SOS BR 

880 003412* ('12767 0^0003 174710 MOV «1,PTPYFL jSET RETRY FLAG, SO NO RETRY 

881 003420' '^00423 B" E? DFC lELSE RETURN 

882 003422' 004767 0*10634 IS! CALL SUPTRG iCALL SETUP PRINT REGISTERS 
983 003426' 016767 174632 174626 MOV UTT,C"D JSELECI DPIVE 

884 003434' 004767 000422 CALL DVEC iGFT DEVICE ERROR COOK 

885 003 44M' 004767 0K0026 CALL CKD^EP JChFCK FOp DENSITY ERROR 

886 003444* 005767 174620 TST WTF j.-^EE IF WRJTt EFRUR 

887 003450' 001003 bNE 2S >IF SO! BR 

888 003452' 004767 0O006f< CALL CFRDEF JCHECK READ ERROR 
88P 003456' 000402 BP CL jGO CLEAR ERROR 

890 003460' 004767 000122 2S! CALL CI-'WTEP fCALL CHECK v^RITF ERROR 

891 0C3464' 004767 000160 CL! JSR PC^LFAR SCLEAP ERRORS 

892 003470' k)O0207 ENDEC: PTS Rf jPETURm 



893 ;— - 

894 

895 ;MCn U.CKD^EP - C^ECK DENSITY ERRORS -------------------------- -- 

896 

897 ci(43472' 016705 174642 CKDNfP! «-'0V S^i^CSifiS JSETUP RXCS FOR ItST 

R9R M03476' 0427f5 177761 BIC !ll77761,R5 JCLEAR ALL HUT COf-^'ftriD 

899 003502' 022705 OOOOIO C"P »10,R5 jIF COMMAND wAS 

900 0V13506' 001015 B^E XDNFP JSET DENSITY. THEN 

901 -^03510' 012767 00^001 174620 MOV »1,Hf jSET FINI FLAG 

902 003516' 005767 174564 TST DF^J JiF 

903 003522' 001004 BN'E IS jS^GLE DENSITY, THEN 

904 003524* 104403 00000O' 005570' MsGf^S , BEGIN , SETSDE JASCII "MESSAGE CALL i^-lT*" CO''N-ON HEADER 

905 003532' 000403 PR Xi^NFR jCOi-.'JINUE 

906 003534* IS! 

907 003534' 104403 00000(*' 005536' MSGNS , PFGIN ,SETDDE jASCII MESSAGE CALL wITP COMMON HFADEH 

908 003542' 1^00207 XDNEP! RFIUP'" {RETURN 

909 .----------------------------------------------- -..---....---....- 

910 

911 ;MOD U.CKPDER - C^ECK READ ERRORS ------------- --..----.-.-.--.--- 

912 

913 003544* H12767 0O00(m 174334 CKRDEP! MOV ^'jEPPTYP 

914 •#«#*«»«»«»«»•»«■»»#»«»■»*»»»»*»*»«»»»#«»«*«»»**»■»«•»»*»»**«■»»««»»# 

915 003552' 104406 00000''* 004626' SOFEPS , RFGl"^ , TABLE jRE^SD ERROR 

916 ;««-»»«»««««««««»«««#«««'»««««««««»««««<»#«»«»»««#«««-»»««««4«»««#«' 

917 003560' 005767 174522 TST DEN |IF DENSITY FLAG IS 

918 0.13564* 001004 BNE IS lEyUAL TO ZERO (SINGLE) THE^' 

919 003566' 104402 0O0000' 005674' MSGSS , BEGIN , RTERSD j ASCII MESSAGE CALL ^lIH NO HEADER 

920 003574' 000403 BR 2S jGO PRINT ERRORS 

921 003?76' IS! 

922 003576' 104402 000000' 005652' MSGSS .BEGIN , RTEPDD ■ ASCII MESSAGE CALL i-IlH NO HEADS R 

923 003604' 000207 2Sl RETURN IPETURN 

924 ; « « « « 
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925 
926 
927 
929 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
951 
952 
953 
954 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
968 
969 



003606' 012767 0^000^ 174272 
H03614' 104406 000000' 004626' 



003622' 
003626* 
M03630' 
003636* 
W03640* 
003640' 
003646' 



005767 174460 

001004 

104402 000000' 005630' 

00040 3 

104 402 000000' 005606' 
000207 



•MOD U.CKi^TER - CHECK WRITE ERRORS --------------------------------- 

CKwtep: ^'0V «0,ERPTyp 

SOFEPS,BEr,IN, TABLE fWRlTE ERROR 

T5T DFN J IF DENSITY FLAG 15 

BNE IS JEQUAL TO ZERO (SINGLE) THEN 

MSGSS, BEGIN, WTEP5D | ASCII MESSAGE CALL l^lTh NO HEADER 

BR 2S JGO PRINT ERRORS 



ISl 
2SI 



fSGSS, BEGIN, KTEPDD 
PETUR*J 



J ASCII MESSAGE CALL WITH NO HEAOFR 
I RETURN 











J MOD U, 
CLEAR I 


,CLP C 
INC 


T ratj iTBDnDc » 




003650' 


005267 


174460 




jjr. MP CrrUrci •■ 

SERFL 


>SET STATUS ERROR FLAG 


003654' 


105767 


174470 






TSTB 


SRXSB 


ISEE IF R.E.C. ERROR 


003660' 


001421 








BEQ 


2S 


jIF NOT! BR 


003662* 


012767 


040000 


174372 




POV 


«40000,CMD 


JSET COMMAND- INIT 


003670* 


016777 


174366 


174470 




MOV 


CMD,PPXCS 


JPEINITIALIZE 


003676' 


004767 


000442 




ISl 


JSR 


PCAl^DN 


JGO AWAIT DONE 


003702' 


005777 


174460 






TST 


»PXCS 


jSEF IF ERROR ON INIT 


003706' 


100006 








BPL 


2S 


IIF NOT! BR 


003710' 


104403 


000000' 


005466' 




MSGNs, 


BEGIN, DRP3 


J ASCI I MESSAGE CALL wflTH COMMON HEADER 


001716' 


004767 


000072 






JSB 


PCiTDRP 


JGO DROP MODULE 


003722' 


0U0431 








BP 


EK'DCLR 




003724' 


005267 


001500 




?SJ 


INC 


BTYN 


JBUMP RETRY COUNTER 


003730' 


016703 


001474 






MOV 


RTYN,P3 


;GET COUNTER 


003734* 


042703 


177770 






PIC 


*177770,H3 


JMARK ASCII 


003740* 


010367 


174364 






MOV 


RI.PTRYFL 


jSET RETRY FLAG 


003744* 


022703 


000003 






CHP 


»3»R3 


ISEE IF DONE RETRIES 


003750' 


001016 








BNE 


ENDCLP 


>IF NOT! BR 












,«»«»«*»»««»»*«•»*#«»»»«»»#»»«»»«»»#«»#»««##»»«*»»»»»*»»*#»»«♦«« 


003752' 


1044PI5 


000000' 


004626' 




HPDFPS 


, BEGIN, TABLE 


^RECLASSIFICATION OF SOFT ERH 












■#*«»■»»»»»#«»*«»»»# 




003760' 


032767 


000001 


174030 




BIT 


81, SRI 


jSEE IF SHOULD DROP MODULE 


003766' 


001404 








BEQ 


3S 


JIF NOTI BR 


003770' 


012767 


000001 


174340 




MOV 


«1»FIN 


jGO DROP MODULE 


003776' 


00040 3 








BP 


ENDCLP 




004000' 


M12767 


000260 


001422 


3SI 


MOV 


S260»PTYN 


JPFSET RETRY COUNTER 


004006' 


005067 


174336 




FNDCLRi 


1 CLP 


SRXSB 


ICLFAP ERROR 


004012' 


000207 








PTS 


PC 


;RFTURN 
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970 
97i 
972 
973 
974 
975 
976 
977 
978 
979 
980 
981 
982 
983 
984 
985 
986 
987 
988 
989 
990 
991 
992 
993 
994 
995 
996 
997 
998 
999 
1000 
1001 
1002 

1003 

1004 



004014' 004767 

004020' 005067 

004024' 004767 

004030' 005767 

004034' 001011 

004036* 012767 

004044* 104405 

004052* H12767 

004060' 0002^7 



v'04062' 
004064' 
004072' 
004100' 
004104' 
0041 10* 
0to4112' 
004116' 
004124' 
0041 30' 
f*04134' 
004140' 
C 4 1 4 4 ' 
004146' 
004152' 
004156' 
004162' 



000240 
052767 
104415 
016701 
016702 
000302 
050267 
016777 
005267 
004767 
005067 
005767 
001006 
010177 
004767 
004767 
000207 



000242 
174236 
000032 
174302 

0(''0034 174042 

00000t)' 004626' 
000001 174256 



0<?0017 174170 
000000' 000360' 
174256 
174254 

174144 

174140 174242 

174176 

000320 

174166 

174172 



174216 

000166 
000002 



;MOD 
TDPPi 


u. 

1 


IDBP 
CALL 


TFST DROP CLEAN- 
SUPTPG 


D9 ..................................... 

ICALL SETUP PRINT REGISTERS 






CIR 


CN'D 


JCLEAR COMMAND i^ORD 






CALL 


DVEC 


jGET DEVICE EPROB CODE 






TST 


FIN 


?IF FIM FLAG 






BNE 


ENJDTDP 


1 EQUALS ZERO THEN 


2$l 




MOV 


#34,ERHTYP 








J «»«««»»»«»»**»«»#*»«« 








HPDEPS 


,PEGIfJ, TABLE 


JINITIALIZE ERPOP 






•#»««« 










MOV 


»l,FPi 


IGO DROP MODULE 


E^mTDRl 


PTS 


PC 




!MOD 


(I 


nvEC -- 


... GF.T DFVirp: V 


■hnop rofu: ................................ 



MOV 
MOV 
SWAP 
BIS 
MOV 
INC 
JSP 
CLR 
TST 
BNE 
MOV 
JSR 
CALL 
EDDVFCI PTS 



NOP 

BIS 8l7,C»'D 
GFTPAS, BEGIN, DECVA 
DECVA+2,P1 
DFCVA-).4,R2 



R? 

P7,CMD 

CMp,(apxCS 

BKPYPS 

PC»AWTR 

BKBYPS 

FIN 

EDDVEC 

Pt ,PRXDB 

PC,»WDN 

CKNXER 

PC 



I 

;0R ERROR CODE COMMAND 

jGET PHYSICAL ADDPESS FPOM Ife-BIT DECVA 
>GET DEF E.C. PHYS ADP 
;GET DEF E.C, XTEND ADP BITS 
J 

ISET EXTEND ADR HITS 
I SEND COMMAND 
jSET BREAK BYPASS FLAG 
ITHFN GO A^vAIT TB 
jCLEAR HRBAK BYPASS FLAG 
JIF FINI FLAG 
jEQUALS ZERO THEN 

JSET BASE ADDP FOR LOAD EXT £PR REG. 
;G0 AWAIT DONE 

ICALL CHECK. NON-EXIIST MEMORY ERPOp 
jRETURN 



# ^ 



BXBC DEC/Xn 
XRXBC0.Pil 



SYSTEM EXERCISFIP MODtJLE 
05-APR-79 ni52 



MACYl! 30AC10523 05-APR-79 11S54 P6GE 25 



1005 
1006 
1007 
1008 
1009 
1010 

1011 

1012 
1013 
1014 
1015 
1016 
1017 
1018 
1019 
1020 
1021 
1022 
1023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
1032 
1033 
1034 
1035 
1036 



jMOD U.CKNXER - CHECK NON-EXISTENT MEMORY ERRORS 



M04164' 
004172' 
004174' 
004200' 
004206' 



032777 
001432 
004767 
012777 
012767 



004000 174176 CKNXEPI 



000062 
040'?'«0 
000010 



174160 
173672 



004214' 104405 000000' 000000 



004222' 
004230' 
004234* 
004242' 
004244' 
004252' 
004260' 



004262' 
004270' 
5^04276' 
004304' 
004312' 
004 320' 
004326' 
004334' 
004342' 



104402 
005267 
022767 
101006 
012767 
104402 
000207 



017767 
056767 
017767 
016767 
016767 
016767 
016767 
016767 
000207 



005764* 000000' 

174076 

000004 174070 



0<?;0001 

000000' 



174100 
173766 
174066 
173764 
173754 
174014 
174034 
174002 



174064 
005504' 



174050 
174042 
174036 
174034 
174024 
173554 
173544 
173542 



BIT 

BEQ 

CALL 

MOV 

MOV 



«40p'0,eRXDB 

XNXFR 

SUPTRG 

#40000»9PXCS 

»t0,ERPTYP 



I IF NONEXISTENT MEMORY 
JERROR, THEN 
jCALL SETUP PRINT REGI 
INITIALIZE DEVICE CjO 
jSET NO^i-EXISTENT MEMO 



STEPS 

CLEAR 
RY EPRi 

PROP 



ERROR) 
OP 



•«■»»»»#»»«»» 



HPDERS, BEGIN, NULL j K'ON-EX ISTENT MEMORY ER 

•»»«#*»#*#»«*»»■»*«#«»»»»»»»*»»»»»«»««»»«»»«##» 

M5GS8,NXEPMS, BEGIN 

INC NXERCT J INCREMENT NONEXISTENT ERROR COU^T MEMORY 

CMP S4, NXERCT I IF NON-EXISTENT MEMORY 

BHI X^XEP JEPPUR C0UhTa3, THEN 

MOV H#FI'^ JSET Flr^I FLAG 

MSGS8»BEGTN,DPP5 I ASCII MESSAGE CALL 

PET'.lRfJ jRETURM 



WITH NO HEADER 



•MOD U.SUPG - SETUP PRINT REGISTERS 



MOV 
BIS 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



PPXCS,SRXCS 

CMD»SRXCS 

0RXOB,SRXES 

SArSPXSA 

TR^SPXTA 

SRXCS»ACSR 

RXCS,CSRA 

SPXES»ASTAT 



?GET RXCS 

JSET SHXCS TO SHOW COM 

>GET RXES 

>GET SECTOR ADDRESS 

jSET TRACK ADDRESS 

JSET CONTENTS OF PXCS 

ISET ADDRESS OF RXCS 

IGET PXES 

jRETUPN 
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1037 
1038 
1039 


004344' 


005067 


17 37 40 




;MnD n 

A^DNi 


WDN AWATT nONE BIT SUBROUTINE -----------------,----------------- 

CLP TOMLT JPESET TIME OUT MULTIPLIER 


1040 


004350' 


005067 


173736 




ISI 


CLP 


T^CKT 


JPPESET TIME OUT COUNTER 


1041 


004354* 


032777 


000040 


174004 


2S! 


BIT 


s40»!apXCS 


;SEE IE DONE SET 


1042 


004362' 


001033 








PNE 


3$ 


!IF SOI BR 


1043 


004364' 


104407 


00000P<' 






PPEAKS 


, REG IN 


jTE^PORARY RETURN TO MOMTOR,,,, 


1044 


004370' 


104407 


00000V1' 






BREAKS 


.BEGIN' 


JTHEN CONTINUE AT NEXT INSTRUCTION. 


1045 


004374' 


005267 


173712 






INC 


TOCNT 


JPUMP TIME OUT COUNTER 


1046 


004400' 


001365 








LNF 


28 


JIE NOT TIMED OUT! BR 


1047 


004402' 


005267 


173707 






INC 


TOMLT 


f INCREMENT TIMEOUT MULTIPLIER 


1048 


004406' 


022767 


000002 


173674 




CMP 


8?,T0'aT 


J IF OM 2nd 


1049 


1*04414' 


101355 








BHI 


IS 


iTIMtOUT PASS, THEN 


1050 


004416' 


004767 


177640 






CALL 


SUPTRG 


JCALL SETUP PRINT REGISTERS 


1051 


004422' 


t>l2767 


00001 I 


173456 




MOV 


»1 1 ,EPPTVP 




1052 












• »♦»«»#»»»«»»»»«»•»«*»»» 




1053 


004430' 


104405 


000000' 


000000 




HPDERS 


,PEGIN,NULL 


jDONE BIT TIME OUT 


1054 














1055 


004436' 


lv;4402 


000000' 


005554' 




MSGSS, 


BFGIN,Df'TO 


J ASCII MESSAGE CALL WITH NO HEADER 


1056 


004444' 


012767 


000001 


173664 




MOV 


»i,FIN 


JDROP MODULE 


1057 


004452' 


000207 






3SJ 


PTS 


PC 


IFXIT 


1058 
1059 


























' 








1060 
1061 
1062 










•MOD U 
AviTRj 




ciiUDmiTTMC" _-_ ________-____-_i____>i____ 


004 45 4' 


005067 


173630 




CLP 


TOMLT 


jPRESET TIMEOUT MULTIPLIER 


1063 


004 460' 


005067 


173626 




IS! 


CLP 


TOCNT 


JPRESET TIME OUT COUNTER 


1064 


.104 46 4' 


032777 


000040 


173674 


2SI 


BIT 


K40,BRxrS 


!IE DONE BIT NOT 


1065 


004472' 


001026 








BNE 


48 


JSET, THEN 


1066 


004474' 


032777 


e00200 


173664 




BIT 


«200»'''RXCS 


;SEE IF TRANSFER READY SET 


1067 


004502' 


001046 








BNE 


6S 


flF SOI BP 


1068 


004504' 


005767 


1736J6 






TST 


HKBYPR 


;1F BREAK BYPASS FLAG 


1069 


004510' 


001004 








BNE 


38 


JNOT SET, THEN 


1070 


004512' 


104407 


000000' 






BREAKS 


, BEGIN 


JTEMPOPARY RETURN TO MONITOR,.., 


1071 


f^04516' 


104407 


0fc'0000' 






PPEAK8 


»BEGIM 


!TriEN CONTINUE AT NFXT INSTPUCTIOM. 


1072 


H^4522' 


005267 


173564 




3$J 


INC 


TOCNT 


jBUMp TIME OUT COUNTER 


1073 


004526' 


001356 








BNE 


28 


;TF NOT TI'^FD OUTI UR 


1074 


004530' 


005267 


173554 






INC 


Tf^MLT 


jINCREMENT TIMEOUT MULTIPLIER 


1075 


004534' 


022767 


000002 


173546 




CMP 


t2#T0MLT 


J IF ON 2ND 


1076 


004542' 


1«1346 








PHI 


IS 


rTIMEOUT PASS, THEN 


1077 


".1454 4' 


004767 


177512 






CALL 


SUPTRG 


JCALL SETUP PRINT REGISTERS 


1078 


004550' 


012767 


000040 


173330 


48! 


MOV 


M0.EPHTYP 




1079 












?»»«*«»«#«*«*#»##»#»#«»#»*»»«*##»*»*»*»«»»#«*»»*####«*«##«»#«*♦# 


1080 


004556' 


104405 


000000' 


000000 




HRDEPS 


,PEGIN,NULL 


jTHANSFER READY TIME OUT 


1081 












}##■»»«#*#«»»##»«*»#»#»» 




1082 


004564' 


012767 


000001 


173544 




MOV 


«lrFIN 


;G0 DROP MODULE 


1083 


004572' 


032777 


000040 


173566 




BIT 


a40,PRXCS 


JIF DONE BIT 


1084 


004600* 


001404 








BEQ 


58 


ISET, THEN 


1085 


004602' 


104402 


000000' 


005574' 




MSGSS, 


BEGIN, TPONEP 


J ASCII MESSAGE C&LL hlTH NO HEADER 


1086 


004610' 


000403 








PR 


66 


JEXIT 


1087 


004612' 








581 








1088 


004612' 


104402 


000000' 


005564' 




MSGSS, 


BEGIN, TRTO 


f ASCII MESSAGE CALL WITH NO HEADER 


1089 


M04620' 


005067 


173502 




681 


CLP 


BKBYPS 


JCLEAR BREAK BYPASS FLAG 


1090 


004624' 


000207 








PTS 


PC 


IPETURN 


1091 



















) 
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1092 










1093 










1094 


004636* 








1095 


004626' 


000340' 






1096 


00463^'* 


000 342' 






1097 


004632* 


000344* 






1099 


004634' 


000346' 






1099 


004636* 


000350* 






1100 


004640* 


000352' 






1101 


004642* 


0(^0354' 






1102 


004644' 


000356' 






11P3 


004646' 


177777 






1104 










1105 










1106 










1 1H7 










ii08 


004650* 


054122 


030460 


0514 40 


U09 


004656' 


041125 


054523 


052123 


1110 


004664* 


046505 


000 




nil 


004667' 


040 


044524 


042515 


1112 


004674* 


047440 


052125 


000 


till 


004701 ' 


040 


051104 


0531U 


1114 


004706' 


020105 


000 




iSiS 


004711' 


040 


037055 


051104 


1116 


004716* 


050117 


046440 


042117 


tin 


004724* 


046125 


022505 


000 


iU8 


004731' 


040 


047111 


052111 


1119 


004736* 


040511 


044514 


042532 


1120 


004744' 


000 






U2I 


P0474S' 


040 


047516 


052440 


1122 


004752' 


044516 


051524 


052040 


1123 


W04760' 


020117 


042524 


052123 


1124 


004766' 


000 






1125 


004767' 


045 


051040 


044505 


1126 


004774' 


044516 


044524 


046101 


1127 


005002' 


055111 


000105 




1128 


005006' 


051440 


052105 


026440 


1129 


005014' 


020076 


040527 


052111 


1130 


005022' 


0471U 


02'1107 


047117 


U31 


00S030' 


000 






1132 


00503J' 


040 


044506 


046114 


1133 


005036' 


F-41040 


043125 


042506 


1134 


005044* 


000122 






U35 


005046' 


051440 


047111 


046107 


S136 


005054' 


000105 






1137 


005056' 


042040 


052517 


046102 


1138 


005064' 


000105 






1139 


005066* 


042040 


047n7 


026*105 


1140 


005074' 


044502 


000124 




1141 


005100* 


032040 


04«522 


051516 


1142 


005106* 


042506 


020122 


042522 


1143 


005114' 


042101 


000131 




1144 


005120' 


042040 


047105 


044523 


1145 


005126' 


054524 


000 




1146 


005131' 


040 


05U05 


047522 


1147 


005136* 


026522 


051040 


052105 



j»««. MESSAGE TABLE 

TABLE} 

APXCSI SPXCS 

ARXESi 5PXF.S 

APXTAl 5PXTA 

APXSAI SPXSA 

APXSBS SRXSB 

APXSBll SPXSBl 

APXSB2I SPXSF^2 

APXSB3I SPXSB3 
«1 



;.--, MFSSAGKS -«------------------- 

MSGl! .ASCIZ 'BXei SUBSYSTEM' 

WSG2J .ASCIZ ' TIME OUT' 

MSG3! .ASCIZ ' DPIVE ' 

MSG4I .ASCIZ ' ->DROP MOnULE%' 

MSG5I .ASCIZ ' INITIALIZE' 

MSGei .ASCIZ • NO UMTS TO TEST' 

MSG7S .ASCIZ '% PEINITIAUZE' 

MSG8S .ASCIE ' SET »> WAITING ON' 



MSG9S 



.ASCIZ 



FILL BUFFFP' 



MSGlU .fiSCIZ • SINGLE* 

MSG12I .ASCIZ ' DOUBLE' 

f^SGlSS .ASCIZ ' DONE PIT' 

MSG14S .ASCIZ ' TPANSFER READY' 

f^SGlSi .ASCIZ ' DENSITY* 

WSG17I .ASCIZ ' EPROP- PETRYl* 
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148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
62 
63 
64 
65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 



1 
1 
1 
1 

1 
1 
I 
1 
1 
1 
1 
1 
1189 



005144 
005150 
005156 
005164 
005166 
005174 
005175 
005202 
005210 
005213 
005220 
005226 
005232 
005240 
005241' 
005246' 
005254' 
005262' 
005270' 
M0527r 
005276' 
005304' 
005312' 
0^55 320' 
005326' 
005334' 
t'05J41' 
00534 3' 
005350' 
005356' 
005364' 
005372' 
005400' 
005406' 
005414' 
005422' 

005424' 



054522 
020045 
020045 
000105 

020045 

000 

040 

020131 

051105 

040 

053101 

046102 

042440 

000 

045 

052105 

042040 

052124 

000 

045 

020106 

051122 

026504 

020131 

051040 

£40515 

045 

055 

P42516 

047105 

047515 

051122 

044440 

046101 

042504 

000 

005424' 

030040 

005430' 

030040 

005434* 



000072 
042523 
051127 



000124 
052111 



MSGl 8 I 
MSG19S 



.ASCIZ 
.ASCIZ 



•t SFT* 
'% *RITF' 



042522 042101 '^SG20J .ASCIZ '% READ' 



046505 
052502 
000 
047516 
0405! I 
000105 
051122 

026440 
044524 
051511 
020105 

020040 
047111 
050125 
02'^f*76 
042516 
043105 
022524 
000 
020076 
044530 
020124 
054522 
<^51117 
044516 
055111 
044526 



052120 
043106 



020124 

040514 



051476 
043516 
042513 
047524 

044440 
042524 
042524 
040515 
042105 
051117 

000 

047516 
052123 
042515 
042440 
026440 
044524 
020105 
042503 



MSG22! .ASCIZ 



051117 N'.SG2 3l 



MSG26I 
h'SG27! 



EMPTY BUFFER' 



NOT AVIALABLE' 



MSG24S .ASCIZ *% ->SETTING DISKETTE TO' 



MSG25I .ASCIZ 



.ASCIZ 
.ASCIZ 



.EVEN 
.ASCIZ 
.EVEN 
.ASCIZ 

.EVEN 



IF lNTERRUPTED-> MAY NEED REFORMAT%' 



-> NONEXISTENT MfrMOHV ERROR - INITIALIZE DEVICE* 
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t 19 '/I 






1191 


CH15 434* 


005175 


il92 


^rsne' 


005232 


1 J93 


uk'.5 4 4'^' 


177777 


1194 


t'P5U2* 


00S031 


S 195 


^105444* 


005232 


1 19b 


fni5i46* 


177777 


1197 


*vi5450* 


004731 


1198 


00*5452' 


0052 32 


1199 


005454* 


0047U 


12P0 


Ot^545b' 


177777 


1201 


i>05460' 


004745 


12fi2 


0(^5 462' 


0047U 


126^3 


I'll 8^464*' 


177777 


1?^4 


ti0S466* 


004767 


1205 


««^4 70' 


005232 


1206 


.'..15 4 72' 


00471 1 


1207 


t"0S474* 


177777 


1209 


01^5476' 


004650 


1209 


005500' 


004711 


1210 


005502' 


177777 


1211 


005504' 


004711 


1212 


0055(?»6' 


177777 


1213 


005510* 


004701 


1214 


005512* 


0^5424 


1215 


00SSS4' 


005213 


3216 


00«i5l6' 


177777 


1217 


00552^ 


004701 


1218 


005S22' 


005 424 


1219 


005524* 


005150 


1220 


iH55526' 


005046 


1221 


005530' 


005120 


1222 


005532' 


00523 2 


1223 


005534' 


177777 


1224 


P05536' 


004701 


1225 


0^5540' 


005424 


1226 


00S542' 


005150 


1227 


005544' 


005056 


1228 


005546' 


005120 


1229 


005550' 


005232 


1230 


005552' 


177777 


1231 


005554' 


005066 


1232 


005556' 


004667 


1233 


005560' 


00471 I 


1234 


005562' 


177777 


1235 


005564* 


005100 


1236 


005566' 


004667 


1237 


005570' 


004711 


1238 


005572' 


177777 


1239 


005574' 


005066 


1240 


005576* 


005006 


1241 


005600* 


005100 


1242 


005602* 


004711 


1243 


005604' 


177777 


1244 


005606' 


004701 


1245 


f:05610' 


005424 



!«»«.« FOPMATTKD MFSSAGES 
BFERls MSG21 

MSG23 


PFEP2! 


MSG9 
M&G23 


DPP! 8 


MSG5 

MSG23 

MSG4 


DSP2I 


MSG6 
MSG4 


DPP3I 


MSG7 

MSG23 

h'SG4 


DPP4S 


MSGl 
MSG4 


DRF5I 


MSG4 


MINT I 


MSG3 
DM!M 
MSG22 


SKTSDES 


MSG3 

MSG18 
HSGU 
MSGiS 
MSG23 


SETDDE: 


MSG3 

DNUM 

FSG18 

H5G12 

MSG15 

MSG23 


DNTOi 


MSG13 
^'SG2 

MSG4 


TPTOs 


MSG14 

MSG2 

^'SG4 


TPDNEPI 


MSG13 
MSG8 
^■.SG14 
N'SG4 


WTEPDD! 


MSG3 

DNUK 



"EMPTY BUFFER" 
"ERROR" 

"FILL BUFFER" 
"EHROP" 

"INITIALIZE" 

"ERROR" 

"DROP MODULE" 

"NO UNITS TO TEST" 
"DROP MODULE" 

"REINITIALIZE" 
"ERROR" 
"DROP MODULE" 

"RX01 SURSYSTEM" 
"DROP MODULE 

"DROP MODULE" 

"DRIVE" 

"8" 

"NOT AVAILABLE" 

"DRIVE" 

"SET" 
"SINGLE" 
"DENSITY" 
"ERROR" 

"DRIVE" 

"8" 

"SET" 

"DOUBLE" 

"DENSITY" 

"ERROR" 

"DONE BIT" 
"TIME OUT" 
"DROP MODULE" 

"TRANSFER READY" 
"TIME OUT" 
"DROP MODULE" 

I "DONE BIT" 

"SET -> WAITING ON" 
|"TRANSFER READY" 
S"->DROP MODULE" 

l"DPIVE" 
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1246 


005612' 


005156 


1247 


005614' 


005056 


1249 


005616* 


005 12^^ 


1249 


005620' 


0051 31 


1250 


005622' 


005 4 3? 


1251 


005624' 


005341 


1252 


0^^5626' 


177777 


1253 


t;05 6 30' 


004701 


1254 


005632' 


005424 


1255 


005634' 


005156 


1256 


005636' 


005046 


1257 


005640' 


^"0512t^ 


125R 


0^5642' 


005131 


1259 


005644' 


005 4 30 


1260 


005646* 


005341 


126! 


005650' 


177777 


1262 


005652' 


004701 


1263 


«05654' 


005424 


1264 


00S656' 


005166 


1265 


005660' 


005056 


1266 


005662' 


0051 20 


1267 


00566 4' 


005 1 31 


1268 


^05666' 


005430 


1269 


005670' 


005 341 


1270 


i'W5 67 2' 


177777 


1271 


005674' 


004701 


1272 


005676* 


005424 


1373 


005 700' 


005166 


1274 


0t)5 702' 


005046 


1275 


005 704' 


005120 


1276 


00^706' 


005131 


1277 


005710' 


005430 


1278 


005712* 


00S341 


1279 


005714' 


177777 


1280 


00571 6* 


00470} 


1281 


005 7 20* 


0C15424 


5202 


005722' 


005241 


1283 


^05724* 


005046 


1284 


005 7 26' 


H0512f' 


1285 


005730* 


005271 


1286 


005732* 


177777 


1287 


1^05734' 


P(0 4701 


J288 


005736' 


005 424 


1289 


005740* 


005241 


1290 


00S7 42' 


00504 6 


1291 


005744* 


005120 


1292 


0057 46' 


177777 


1293 


0C"5 750' 


004701 


1294 


005752' 


005 42 4 


I29S 


005754' 


005241 


1296 


P0S7S6* 


005056 


1297 


005760* 


00s 120 


1298 


005 762* 


177777 


1299 


005764* 


005343 


1300 


005766* 


177777 


1301 







MSG19 
MSG12 
NSG15 
MSG17 

PTYN 

MSG26 

-1 

PI HSG3 
DNUK 
HSG19 
MSGll 
MSG15 
MSG17 
HTYN 
MSG26 
-1 

Dl MSG3 
DNUM 
MSG20 
MSG12 
h^SGlS 
MSGJ7 
RTYN 
MSG26 
»1 

Dl FSG3 
DNUM 
HSG20 
MSGll 
MSG15 
MSG17 
PTY^' 
MSG26 
"1 

■'J I MSG3 
DNUf^ 
MSG24 
MSGl 1 
M5G15 
MSG25 
-1 

^S HSG3 
DNUM 
M5G2 4 
h'SGll 
MSG15 
«1 

^1 MSG3 
DNUM 
MSG24 
MSGt2 
MSG15 
«l 

St MSG27 



"WRITE" 

"DOUBLE" 

"DEKSITY" 

hE:rrOR«PETRY!" 

"I" 

"CPLF" 

"DRIVE" 

MJjH 

"WRITE" 

"SINGLE" 

"DENSITY" 

"ERROR-RETRY I" 

»»" 

"CRLF" 

"DPIVE" 

"READ" 
"DOUSLE" 
"DENSITY" 
"EPROP«»RETRY!" 

"CPLF" 

"DRIVE" 

»S" 

"READ" 

"SINGLE" 

"DENSITY" 

"ERROR-PFTPYI" 

II g II 

"CPLF" 

"DRIVE" 

"«" 

"SETTING DISKETTE TO" 

"SINGLE" 

"DENSITY" 

"IF INTERRUPTED-MAY NEED REFOpMftT" 

"DRIVE" 

"#" 

"SETTING DISKETTE TO" 

"SINGLE" 

"DENSITY" 



"SETTING DISKETTE TO" 

"DOUBLE" 

"DENSITY" 

"»>NON EXISTENT MEMORY ERROR" 
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1302 ;— — DATA BUFFERS — — -«--»«.-» — — — .«-»-- 
1303 

1304 .EVEN 

1305 00577(*' 000000 BBUFf JREAO BUFFEp 

1306 006372* ,s,4400 

1307 J-— 

1308 000001 .FND 
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293*1 1032* 

259» P54 855 

322S 
10958 
1096« 
1098S 
1099* 
1100* 
U01S 
U02# 
|097« 

297» 

295# 1034# 

298« 

530 585 640 725 747 769 780 947 1001 1039» 

551 555 575 580 6(^b 610 630 635 775 799 819 99b 10628 

2568 461 466 485 486 495 524 535 594 596 651 653 65b 

712 734 736 756 758 779 803 823 863 866 904 907 915 

919 922 929 933 936 950 960 979 989 1014 1016 1021 1043 
1044 1053 1055 1070 1071 1080 1085 1088 

653 H9li( 

596 li94« 

477« 

3228 

322» 

322S 

3228 

322* 

322S 

322« 

322« 

322# 

322» 

322« 

3228 

32211 

322«» 

322« 

322# 

346l» 579» 58l« 634* 636» 995» 997» 1068 1089# 

478 484 489 492 497« 

322» 1043 1044 1070 1071 

261S 853 871 

2628 

322« 

322« 656 

312# 

313«> 

885» 897» 

588* 645» 1002* 1008« 

898* 913» 

890« 927« 

889 891ii 

891 942» 

328» 528* 529 547» 548» 549« 550 569» 570» 573* 574 b02* 603» 

604« 605 624# 625* 628« 629 722* 723» 724 744* 745* 746 766* 



ACSR 


000102R 


ADDR 


000006P 


ADDP22a 


001000 


ABXCS 


004626B 


APXES 


004630P 


APXSA 


004634P 


ARXSB 


004636P 


ARXSBi 


004640R 


ARXSB2 


004642R 


ARXSB3 


004644R 


ARXTA 


004632R 


ASB 


000106R 


ASTAT 


0ta0104P 


AWAS 


0001 10R 


AWDN 


004344P 


AWTP 


004454P 


BEGIN 


000000P 


BFERl 


005434R 


BFER2 


005442R 


BGNDO 


t''00670P 


BIT0 s 


000001 


BIT! s 


004^002 


BlTi0 = 


P02000 


BITU s 


004000 


BIT12 a 


010000 


BlTi3 s 


020000 


BIT14 = 


040000 


BIT15 s 


100000 


8112 s 


000004 


8IT3 s 


000010 


BIT4 a 


00^020 


BITS s 


000040 


BIT6 s 


000100 


BIT7 3 


000200 


BIT8 s 


P00400 


BIT9 s 


001000 


BKBYPS 


000326R 


BKLOOP 


001002R 


BREAKSs 


104407 


BRl 


000012R 


BP2 


00001 3R 


BTODS a 


104421 


CDATASs 


104412 


CDERCT 


000144R 


CDt^DCT 


«'00146p 


CKDNEF 


003472R 


CKNXEP 


004i64R 


CKRDEP 


003544H 


CKWTEP 


003606R 


CL 


003464R 


CLEAR 


s'03650R 


CMD 


000262P 
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767» 
8fl3» 
281# 

3?2» 
322« 

364# 

338$ 

519 

337» 

700 

1055 
454» 

1214 
500 
535 
712 
950 
466 

1021 
327» 
884* 
263» 
324» 
450 
40p 
999 
952 
801 
881 
60B 
532 
623 
322^ 
545 
5"'7 
681 
705 
976 
665 
727 
749 
3228 
296« 
3228 
350» 
576 
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CONFIG 


000056R 


CSP& 


000100R 


DATCKSs 


104411 


DATEPSa 


104404 


DECVA 


000360B 


DEN 


000306P 


DENCH 


002734P 


DENSTY 


000304R 


ONSET 


002616R 


ONTO 


K05554P 


DNUM 


005424P 


OOUNTL 


001i50R 


DBPi 


005450P 


DRP2 


005460R 


DBP3 


005466R 


DRP4 


005476R 


DBP5 


005504P 


DRVN 


000260R 


PVEC 


004062R 


DVIDl 


H00014R 


DVIDIX 


000252R 


Dl 


000544R 


EDBYPS 


000720R 


EDDVEC 


004162R 


ENDCLP 


004006R 


ENDDNC 


003244R 


ENDEC 


0O3470R 


ENDIN 


001676P 


ENDINT 


001230R 


ENDIN2 


002i04P 


ENDlT$a 


104413 


ENDOUT 


001372R 


END0U2 


001556H 


ENDSEL 


002232R 


ENDST 


002360R 


ENDTDR 


004060P 


ENDTSS 


002142R 


ENDUT0 


002476R 


ENDUTl 


«02614R 


ENDS s 


104410 


ERRTYP 


000106R 


EXITS s 


l«4400 


FIN 


000336R 


FINI 


001156R 


FIRST 


000576R 


FREE 


000150R 


GETPASa 


104415 


GO 


000632P 


GWBUF$3 


104414 


HPDCNT 


v»00044R 


HRDERSa 


104405 



80(1 

467 

448 

314« 

322« 

465 

3228 

276# 

3228 



989 
438# 
786* 
439« 
708 
123H 
459# 
1218 

52H 
n97# 
J20H 
1204» 
1208# 
1211# 
443» 
974» 
446 
446« 
456» 
483# 
1003S* 
958 
806 
892l» 
612 
534 
632 
495 
553 
583 
688# 
709 
982» 
668# 
730 
752 
524 
592« 
863 
437# 
582 
805 
470 
453 

485 

4688 

486 



772« 
946 



990 
518# 



549 
7660 



680« 
1225 



673 
987# 
452 
451» 



965 
815 

618« 
537« 
638 

557 
587 



7386 
760f! 



469 
586 
820 
473 
458 



773* 
973* 



991 
794 



687* 
1245 



457 
456« 



967» 
821 



561 

590 



472 

607 

825 

5238 

462# 



774 
988* 



699* 
1254 



564» 
597# 



483 
611 

901* 



796* 
993* 



917 
625 



707* 
1263 



797* 
994 



798 
1028 



731* 
1272 



753* 
1281 



790* 
1288 



793* 
1294 



488 
631 
964* 



491 
637 
975 



521 
641 
981* 



531 

713* 

998 



544 
726 

1020* 



552 

748 

1056* 



556 

770 

1082* 



560 
77b 
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HRDPAS 


000050B 


278» 


























ICONT 


000036P 


273K 


























ICOUNT 


M00040R 


274S 


























IDNUM 


000122R 


303« 


























IMODX.a 


M00000 


315« 


487 
























INBUF2 


e01700R 


617 


622« 
























INIT 


O0O030R 


270« 


























INLOOP 


000322P 


344» 


477 


494* 


497* 




















INPUT 


rt01560R 


490 


60t# 
























INT 


000314R 


341* 


462* 


474* 


696 


7r4 


















INTER 


003340R 


559 


614 


P04 


824 


862i« 


















INTIAL 


001162R 


468 


5288 
























INTR 


(^00120R 


3028 


























ITBYPS 


000324R 


345S 


479 


498» 


509* 




















MAP22SS 


104416 


322« 


























MODNAM 


000000R 


257l» 


























MODSP 


000252R 


271 


320# 
























MSGNS = 


104403 


322« 


461 


466 


535 


712 


779 


803 


823 


904 


907 


950 






MSGSS s 


1044t'2 


322« 

10R8 


596 


653 


736 


758 


919 


922 


933 


936 


1016 


1021 


1^55 


1085 


M5G$ 3 


104401 


322« 


























MSGI 


004650R 


11088 


1208 
























MSGll 


0'.15046P 


n35# 


1220 


1256 


1274 


1283 


1290 
















MSG12 


005056R 


11378 


1227 


1247 


1265 


1296 


















MSG13 


005066R 


lt39« 


1231 


1239 






















MSG14 


005100P 


1141? 


1235 


1241 






















MSGiS 


005120P 


1144S 


1221 


1228 


1248 


1257 


1266 


1275 


1284 


1291 


1297 








MSG17 


0051 31 R 


11468 


1249 


1258 


1267 


1276 


















MSG18 


005150R 


1149» 


1219 


1226 






















MSG19 


t^05156p 


n50# 


1246 


1255 






















HSG2 


004667R 


mis 


1232 


1236 






















MSG20 


005166R 


1152# 


1264 


1273 






















MSG21 


005i75R 


n54» 


1191 
























MSG22 


0052i3R 


ll57f( 


1215 
























MSG23 


005232R 


tl60# 


1192 


1195 


1198 


1205 


1222 


1229 














HSG24 


005 24 IP 


1162» 


1282 


1289 


1295 




















MSG25 


005 27 IP 


n67» 


1285 
























MSG26 


(^05341R 


1174# 


1251 


1260 


1269 


1278 


















MSG27 


005343P 


n75» 


1299 
























HSG3 


004701R 


11138 


1213 


1217 


1224 


1244 


1253 


1262 


1271 


1280 


1287 


1293 






MSG4 


00471 IP 


in5« 


1199 


1202 


1206 


1209 


12U 


1233 


1237 


1242 










MSG5 


0C4731R 


1118« 


1197 
























MSG6 


(^04745R 


1121» 


1201 
























MSG7 


0M4767P 


1125« 


1204 
























MSG8 


005006R 


n.281! 


1240 
























HSG9 


005031R 


1132» 


1194 
























NTRUPT 


003344R 


952 


864ii 
























NUAV 


000570R 


455 


460* 
























NULL s 


000000 


3228 


594 


651 


734 


756 


1014 


105 3 


1080 












NUNT 


005510R 


461 


736 


758 


1213« 




















NXERCT 


000 332R 


348S 


445« 


1017# 


1018 




















NXEPMS 


00§764r 


1016 


i299« 
























OPEN s 


000000 


258 


264 


265 


266 


267 


284 


285 


286 


287 


288 


289 


290 


291 






293 


295 


297 


298 


300 


301 


302 


305 


30b 


308 


309 


311 


312 






313 


314 


322i» 






















OTOAS as 


104420 


122S 
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0UBUF2 

OUTPUT 

PASCNT 

PIRQ$ s 

POPSP E 

P0PSP2S 

PPTY B 

PBTY0 s 

PPTYi s 

PBfY2 s 

PRTY3 s 

PRTY4 s 

PHTY5 s 

PBTYS a 

PRTY7 s 

PS s 

PSW s 

PUSH s 

PUSH? s 

BANDS s 

BAi^NUM 

BBUF 

RBUFEA 

BBUFPA 

PBUFSE 

PBUFVA 

READ 

RESTFT 

PESl 

RES2 

RSTRT 

PfERDD 

RTEPSD 

RTRYFL 

PTYN 

BXCS 



0'li 40f5P 
Pf*?1232R 
000034P 

000004 

005726 
«22626 

000000 
000000 
000040 

000 1P5'^ 

00014-^ 

000200 
000240 

000300 

000340 

177776 

177776 

003746 

024646 

104417 

ii00054B 

005770P 

000i30P 

«'^0126R 

0001 3 2P 

000124P 

000752R 

000666P 

0000S6P 

000060P 

fi001i2P 

00S652R 

005674R 

k*00330R 

0PIS4 30R 

000366P 



SA 


4^00274R 


SASAV 


00e300R 


SBADP 


t^00l02P 


SDBLDN 


005750R 


SECK 


003372R 


SEtD 


002H4R 


SEBFL 


000334R 


SETDDE 


005536R 


SETSDE 


005520R 


SETSDN 


005716P 


sorcNT 


000042R 


SOFERSs 


104406 


SOFFAS 


000046R 


SPOINT 


e^00032B 


SPSIZ s 


i-!000 40 


SRKCS 


1500 3 4 0P 



543 
497 
272S 
322S 

3228 

322S 

322S 

262 

3228 

322« 

322» 

3228 

261 

322« 

322« 

322# 

322# 

322# 

3228 

322» 

2«0# 

3«4 

306 8 

30S« 

307» 

304 « 

4<?0# 

299 

2fl2« 

2fl3» 

922 
919 

347# 

370« 
768** 
1064 
37}8 
822« 
333« 
335 » 
292S 
823 
7!51 
475* 
349« 
907 
904 
779 
275# 
3228 
277« 
271K 
1# 
356S 



569# 

542# 



1305s 
626 
639 

485 

476S 



1262« 
1271S 
562 
601» 
464 
774» 
1066 
554» 
855# 
481« 
435* 

1293# 

868 

520« 

444# 

1224« 

I2n« 

1280# 

915 

433 
315 

897 



615 

953* 

529* 

798» 
10P3 
558« 
856» 

554 
481 



876# 
673« 
622 



954 
533 
8i8* 

578* 

1000» 

609 
51M» 



678 
876* 



956« 
96b* 
550* 
854* 

584* 
1008 
662* 
511 



685 
942* 



Ufi7» 
574* 
877 

609* 
1029 
663 
513* 



1250 
589 
946* 



666* 
666 



1259 
605* 
948 



1268 
629* 
994* 



1277 

643 

1011* 



646 
1027 



724* 
1033 



746* 
1041 



1027* 1028* 
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SRXES 


000342B 


357« 


1029* 


1034 


1096 




SPXSA 


000346R 


359# 


1030* 


1098 






SHXSB 


000350P 


360« 


364 


943 


967* 


1099 


SRXSBl 


000352P 


361# 


1100 








SBXSB2 


000354R 


3628 


1101 








SPXSB3 


000356P 


363« 


1102 








SPXTA 


000344P 


3S8« 


1031* 


1097 






SB! 


00M016R 


264# 


962 








SR2 


000020P 


265« 










SR3 


000O22P 


266^ 










SB4 


000024P 


267s 










SSGLDN 


005734R 


903 


t287# 








START 


000376R 


270 


432« 








STAT 


000026R 


269« 










STATUS 


l<)02234R 


471 


6921 








SUPTRG 


004262P 


591« 


648* 


882* 


972« 


1010» 


SVR0 


000062P 


284» 










SVPl 


0v;0064R 


285« 










SVP2 


t"00066R 


286« 










SVR3 


00007fr^R 


287(! 










SVR4 


000072R 


2888 










SVP5 


000074R 


2B9n 










SVR6 


000076R 


290 8 










SYSCNT 


000052P 


279# 










TA 


000272P 


332« 


482* 


505* 


506 


508* 


TABLE 


004626R 


915 


929 


960 


979 


1094# 


TASAV 


000276R 


334# 


434* 


482 


508 


514* 


TDRP 


004014P 


536 


951 


9728 






TOCNT 


t^00 3l2P 


340S 


1040* 


1045* 


1063* 


1072* 


fOMLT 


y00 310R 


339S 


1039* 


1047« 


1048 


1062* 


TBDNEP 


005574R 


1085 


1239» 








TRPDFDs 


000022 


322» 










TPTO 


005564R 


1088 


1235» 








ISS 


002t06R 


493* 


6628 








TSSFLG 


000320P 


343« 


499 


501* 


667* 




UDNCK 


003246R 


502* 


839« 








UNIT0 


000254B 


325 « 


440* 


683 


694 


710 


UNIT! 


000256P 


3268 


441* 


676 


702 


759* 


UNT0 


«ifl2362P 


693 


7208 








UNTi 


002500R 


701 


7428 








UT 


000266P 


330» 


789# 


792* 


797 


807 


UTDONE 


0003I6R 


34281 


503 


843* 


845* 




UTT 


000264R 


3298 


442* 


547 


602 


679* 


U0 


002236R 


693# 










Ui 


002274R 


6'»5 


697 


7018 






VARIFY 


000 3 7 4P 


373» 


778 


802 


822 




VEC 


000372P 


372S 










VECTOP 


00aei0R 


260# 


851 


869 






VSET 


00 3 300R 


463 


8518 








WASADR 


00010 4P 


294# 










WBUFEA 


000136R 


3098 


571 








WBUFPA 


000134P 


3088 


584 








WBUFRQ 


0001 40R 


3101 










t^BUFSE 


000i42p 


311# 










WDCNT 


000302R 

000U6R 


336« 

301S 


436* 


578 


633 





737* 
787 


811 
841 


831 




809* 


817 


827 


829' 


686* 


698* 


706* 


767 
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WDTO 


H0H1 t 4R 




300» 






WRITE 


0tt0740R 




4P7# 






WTERDD 


005606P 




936 


1244« 




WTERSD 


005630P 




933 


1253« 




WTF 


000270R 




3318 


542# 


564* 


XDNER 


003542R 




900 


905 


90fi# 


XDNSET 


002732R 




771 


777 


782# 


XFLAG 


000005R 




258» 






XNXER 


004260R 




1009 


1019 


10228 


XUDNCK 


003276R 




844 


e46# 




* ^ 


006372P 




365 


366 


657 


. ABS. 


000000 

006372 


000 
001 









) 



n84« 11868 1188# 1306(t 



ERRORS DETECTED I 
DEFAULT GLOBALS GENERATED I 







XPXBC0,XRXBC0/SOL/CPFiSYMaDDXCOM,XRXBC0 
RUN-TIMEl 7 12 1 SECONDS 
RUN-TIME RATIOl 90/2134.2 
CORE USEDI 9K C17 PAGES) 



